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ARQUITECTURA 


N este tema vamos a 
intentar conocer 
cómo es por dentro 
un ordenador, punto 
de trascendencia 
fundamental para el 
posterior desarrollo 
de cualquier aplica- 
ción obteniendo su máximo rendimiento. 

Fundamentalmente un ordenador está 
compuesto por dos partes: 


— La unidad central de proceso, que 
abreviadamente se conoce por las siglas 
CPU o UCP, según se utilicen las inglesas 
o las castellanas. Esta parte es la que 
constituye el verdadero “centro de tra- 
bajo” del ordenador, ya que en ella se 
ejecutan los programas. 


ENTRADA 


lA! Oficina de tareas administrativas. 
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DE LOS ORDENADORES 


— Las unidades periféricas, que son 
dispositivos que tiene el ordenador para 
comunicarse con su entorno, los medios 
por los que se proporciona información 
al ordenador y aquéllos por los que el or- 
denador suministra los resultados de los 
programas. También suelen considerarse 
como unidades periféricas los distintos 
dispositivos de almacenamiento secun- 
dario de los cuales se hablará más ade- 
lante. 


Profundizando un poco más en el inte- 
rior del ordenador veamos de qué partes 
está compuesta la Unidad Central de Pro- 
ceso. Para ello vamos a hacer una ana- 
logía entre el funcionamiento del orde- 
nador y el de una oficina en la que se 
ceo tareas administrativas (ver figu- 
ra 


SALIDA 


La oficina de la que hablamos está si- 
tuada en una habitación en la que sólo 
hay un empleado. El trabajo de cada 
mañana le llega por una ventanilla de re- 
cepción por la que recibe diariamente 
los albaranes que contienen una lista de 
pedidos. El tratamiento que se da a cada 
albarán dependerá de ciertas normas 
que le han sido previamente detalladas 
“programando” las operaciones a reali- 
zar. Como útiles de trabajo, el empleado 
dispone de un tablero en el que va colo- 
cando las normas a seguir en cada caso, 
la lista de precios para cada cliente y la 
lista de descuentos, y, para las operacio- 
nes aritméticas que tenga que hacer, 
una calculadora. 

En el proceso de facturación el em- 
pleado realiza los siguientes pasos: 


— Lee cuidadosamente la lista de ins- 
trucciones que figuran en el tablero, eje- 
cutando una detrás de otra todas las ins- 
trucciones. 


— Con las normas a seguir y los datos 
necesarios para realizar la facturación 
realiza las operaciones aritméticas de 
cálculo de precios y descuento. 

— Con los datos y los resultados obte- 
nidos rellena el documento de facturación 
y lo deposita en la ventanilla de salida. 


Estas operaciones se replten tantas ve- 
ces como haga falta hasta teminar con 
el último albarán y su factura correspon- 
diente. 

Cuando el volumen de trabajo sea tan 
grande que ocupe todo el espacio del 
tablero será necesario que el empleado 
vaya guardando los documentos en al- 
guna parte. Para ellos dispone de un ar- 
chivo fuera de la oficina en una habita- 
ción separada. 

Una vez visto este ejemplo de trabajo 
será más fácil entender el funcionamien- 
to y las distintas partes del ordenador. En 
la figura 2 vemos representados los dis- 
tintos elementos: 


lA Partes de un ordenador. 
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— Los dispositivos de entrada/salida 
del ordenador corresponderían en nues- 
tro ejemplo a las dos ventanillas que co- 
munican la oficina con el exterior. Por la 
que le llegan al empleado los albaranes 
sería “el dispositivo de entrada de da- 
tos”, y por la que él va entregando las 
facturas actualizadas sería “el periférico 
de salida” del ordenador. 


— El director de la empresa, encarga- 
do de determinar las órdenes que tiene 
que ejecutar el empleado a la hora de 
calcular las facturas, y controlar si dicha 
ejecución ha sido bien realizada, es el 
equivalente al elemento U.C. o unidad 
de control. 


— la pequeña calculadora utilizada 
para los cálculos es lo que en términos 
de arquitectura se denomina unidad arit- 
mético-lógica. 


— El tablero en el que se van colocan- 
do tanto las acciones a seguir como los 
datos que van slendo obtenidos es el ele- 
mento M.C., o memoria central donde se 
almacenan los programas y datos. Esta 
memoria tiene normalmente una capaci- 
dad finita, insuficiente para almacenar to- 
dos los datos. 


— Cuando los documentos no cabían 
en la oficina se almacenaban fuera de 
ella. En el caso del ordenador éste alma- 
cenamiento secundario es lo que consti- 
tuye la memoria secundaria y serán nor- 
malmente discos magnéticos, cintas, 
etcétera. 


En resumen, los órganos básicos de un 
ordenador son: 


— Launidad central de proceso, com- 
puesta por: 


e| La unidad de control. % 
e La unidad aritmético-lógica. 
e La memoria central. 


— Los dispositivos periféricos: 


* De entrada/salida. 
e De almacenamiento secundario. 


Una vez conocido el “interior” de un or- 
denador vamos a ver cómo funciona más 
detalladamente cada una de sus partes. 


1 Unidad central de proceso 


LO UNntac 


ga qe 


Como vimos anteriormente, la U.C. es 
el órgano "más inteligente” del ordena- 
dor, que se encarga de dirigir y contro- 
lar cada una de las acciones que se eje- 
cutan en él. Es decir: 


— Analiza e interpreta las, instruccio- 
nes del programa que se está ejecutan- 
do. 


— Dirige el funcionamiento de las dis- 
tintas partes del ordenador mediante ór- 
denes dirigidas a las mismas controlando 
su actuación. 


Para saber qué operaciones se tienen 
que realizar se habrá cargado previa- 
mente en la memoria del ordenador el 
correspondiente programa. Una vez he- 
cho esto, los pasos que sigue la U.C. son 
los siguientes: 


— Extrae de la memoria la instrucción 
a ejecutar. Para ello existe en la máqui- 
na un “apuntador” que señala cuál es la 
instrucción siguiente. Este “apuntador” es 
un registro llamado contador de progra- 
ma, que contiene la dirección de memo- 
ria donde se encuentra esta instrucción. 
Cuando se extrae, el P.C. (abreviatura de: 
siglas inglesas) se incrementa para 
apuntar a la dirección de la siguiente ins- 
trucción del programa. 


— Una vez extraída se coloca en el lla- 
mado registro de instrucción que consta 
de dos partes: una, que contiene el có: 
digo de operación que identifica la ope- 
ración a ejecutar (suma, resta.. ,) y la se- 
gunda, que contiene la dirección en la 
que está almacenado el operando. 


— Si la operación identificada es de 
tipo aritmético se ordena a la U.A.L. que 
la realice, 


— Si la operación ha proporcionado 
nuevos datos, éstos se almacenan en la 
memoria principal (ver figura 3). 


La unidad 


La U.A.L. es la parte del ordenador en- 
cargada de efectuar las operaciones 
que indiquen las instrucciones del progra- 


aritmética lógica 


A, Partes de la unidad de control. 


ma. Las operaciones que puede realizar 
esta unidad son de tipo: 


= Aritmético: suma, resta, multiplica- 
ción, división. 2 4 
— Lógicas: comparación, negación... 


Estas operaciones se realizan sobre da- 
tos o informaciones que previamente 
han sido almacenados en memoria, y 
nunca podrán efectuarse sobre más de 
dos operandos, de manera que si hay 
que hacer la suma de tres cantidades 
será necesario sumar de dos en dos, te- 
niendo, por tanto, dos sumas. 

Los pasos a seguir en la U.A.L. para rea- 
lizar operaciones son: 


— Cargar el primer operando en el 
acumulador (registro de almacenamien- 
to temporal). 

— Realizar la operación con el segun- 
do operando y el contenido del acumu- 
ltador. 


Cargar el contenido del acumulador 
en la dirección del resultado. 

Para poder hacer todo esto se debe 
proporcionar a la U.A.L. los siguientes da- 
tos: 


— Código de operación, que indique 
la operación a efectuar. 

— Dirección de la célula en la que se 
encuentra almacenado el primer ope- 
rando. 

— Dirección del segundo operando. 

— Dirección de la célula en la que se 
almacenará el resultado. 


Podemos ver más detalladamente el 
tuncionamiento de la unidad aritmético 
lógica en la figura 4. 


Unidad aritmético-lógica. 


Memoria central 


La memoria central del ordenador es el 
elemento que se encarga de almacenar 
datos y programas (información en gene- 
ral). Por tanto, la memoria puede consi- 
derarse como un órgano pasivo en el 
que se; 


— Introduce información (“escribir en 
memoria”). , 

— Extrae información (“leer en memo- 
ria”). 


[A Memoria central. 


La memoria está constituida por un 
conjunto de celdas ordenadas numéri- 
camente por sus direcciones y que son 
capaces de albergar un dato o una ins- 
trucción. Para poder acceder al conteni- 
do de una celda de memoria o escribir 
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algo en ella la memoria dispone de dos 
registros: 


— Registro de dirección de memoria: 
contiene en un momento dado la direc- 
ción de la celda que se trata de buscar. 

— Registro de información de memo- 
ria: en el deposita la memorla el conte- 
nido de la celda seleccionada en el 
caso de una operación de lectura, o 
bien contlene una información para que 
sea depositada en la celda selecciona- 
da en el caso de escritura. 


Según vaya a efectuarse una opera- 
ción de lectura o de escritura, se segul- 
rán los siguientes pasos: 


Lectura: 


— Almacenar la dirección de la celda 
en la que se encuentra la información en 
el registro de dirección. 

— Cargar en el registro de Intercam- 
bio la información contenida en la celda 
apuntada por el registro de dirección. 

— Transferir el contenido al registro de 
la CPU que corresponda. 


Escritura; 


— Transferlr al registro de intercambio 
la información. 

— Almacenar la dirección de la celda 
receptora de información. 

— Cargar el contenido de intercam- 
bio en la celda apuntada por el registro 
de dirección. 


TA 


LI Proceso de escritura/lectura en memoria. 


Una propiedad de la memoria central 
es que cuando se “grabe” en una celda 
la información, automáticamente queda 
destruida la información que contuviese 
anteriormente. No ocurre esto, evidente- 
mente, al leer el contenido de una cel- 
da, que consiste únicamente en hacer 
un duplicado de la información que se- 
guirá permaneciendo en dicha celda, 


Dispositivos periféricos 


Podemos hacer una clasificación en 
dos grandes grupos: 


— Los que se encargan del intercam- 
bio de información entre el ordenador y 
el exterior; y 

— Los dispositivos de almacenamien- 
to de grandes volúmenes de informa- 
ción. 


Dentro del primer grupo podemos dis- 
tinguir los que se encargan de introducir 
información al ordenador, que serían los 
de entrada. De salida serían aquéllos por 
los cuales el ordenador proporciona in- 
formación. Normalmente la información 
que introducimos al ordenador no es di- 
rectamente legible por él, por lo que hay 
que “transcribir” dicha información a un 
sistema legible por él (es decir, ceros y 


Lectura de memoria 


Escritura 
en 
memoria 


unos) mediante la función de codifica- 
ción; análogamente, será necesario rea- 
lizar la operación contraria, llamada de- 
codificación para que los resultados de 
los programas ya ejecutados sean inteli- 
gibles al hombre. 

Como dispositivos de este tipo pode- 
mos citar, como más conocidos: 


— Teclado: dispositivo de entrada. 
— Pantalla, impresora: dispositivos de 
salida. 


En cuanto al segundo grupo menciona- 
do, también llamado “memoria externa”, 
se encarga de almacenar los datos del 
ordenador que necesitará recuperar en 
cualquier momento y que en un instante 
dado no cupieron en la memoria interna 
del ordenador. 


Dentro de este grupo están los conoci- 
dos discos, disquetes, cintas magnéticas, 
etcétera. 


INTRODUCCION 


Il tuviéramos que defi- 
nir el microprocesa- 
dor 6502 de forma rá- 
pida y sencilla, diría- 
mos que se trata de 
una CPU integrada en 
una sola “pastilla”. Su 
esquema responde 
al dibujo de la figura y a continuación ve- 
remos su funcionamiento básico. 


CONTROL 
EXTERNO 


CONTROL 
INTERNO 


MAQUINA 6502 


(COMMODORE 64) 


7] 
5 


I Su funcionamiento 


El microprocesador 6502 funciona de 
la siguiente manera: contiene un juego 
de instrucciones codificadas con 8 bits 


8BITS pus 
DATOS 


CONTROLADOR | 


BUS 
DIRECCIONES 


46 BITS 


aque entiende y es capaz de ejecutar. Así, 
por ejemplo, hay una instrucción que 
consiste en traer un dato de una determi- 
nada posición de memoria a uno de los 
registros internos del 6502. Esta instruc- 
ción tendrá un código de 8 bits y cuan- 
do se la mandemos al microprocesador, 
éste lo decodificará y realizará la opera- 
ción. 

Para obtener'una instrucción (su códi- 
go), el microprocesador coloca en el bus 
de direcciones (16 bits) la dirección de 
memoria donde se encuentra dicho có- 
digo y espera a que la memoria le con- 
teste colocándolo en el bus de datos (8 
bits). Los controladores de los buses de 
datos y de direcciones son los encarga- 
dos de indicar al microprocesador cuan- 
do pueden mandar datos o tienen datos 
preparados para ser leídos. 

Una vez que el 6502 tiene el código de 
la instrucción que debe ejecutar, lo guar- 
da en el registro de instrucciones y el de- 
codificador de instrucciones se encarga 
3e mandar por sus líneas de salida las ór- 
denes necesarlas para realizar lo que re- 
auiera la instrucción. 


0 Los registros del 6502 


Con lo que hemos visto hasta ahora se 
nos plantea una pregunta: ¿Cómo sabe 
=l microprocesador en qué dirección de 
memoria se encuentra la instrucción que 
Jebe ejecutar? 

El contador de programa (PC), uno de 
»os registros del 6502, nos soluciona este 
problema. El PC es un registro que con- 
Mene la dirección de la instrucción que 
debe ejecutar el microprocesador en 
cada momento. Todas las Instrucciones 
ue queramos que el 6502 ejecute con- 
secutivamente (un programa) deberán 
encontrarse en posiciones de memoria 
consecutivas. De esta forma el PC, cada 
vez que obtiene un código de Instrucción 
cumenta en uno para contener la direc- 
cion del siguiente byte que se debe leer 
ce memoria. 

Otros registros importantes del 6502 
son: 

— El acumulador. Podríamos decir que 
ss un registro “comodín” que utiliza el 


6502 para realizar gran parte de las ope- 
raciones. Así, hay muchas operaciones 
que sólo pueden realizarse cuando el 
operando o alguno de ellos se encuen- 
tra en el acumulador. Esto nos ahorra te- 
ner que especificar en muchas instruc- 
ciones los operandos porque ya sabe- 
mos que se refiere al número guardado 
en el acumulador. 

— El puntero de pila (5). Es un registro 
que contiene la dirección de memoria 
de la “cima” de fa pila. La pila es un 
conjunto de direcciones de memoria 
consecutivas donde guardamos datos 
con la característica de que el último 
dato introducido será el primero en sa- 
car. La “cima” de la pila será precisa- 
mente la dirección del último dato intro- 
ducido. Cuando se introduce un dato se 
aumenta en 1 el puntero de pila y cuan- 
do se saca un dato se disminuye en 1. 


Al meter 
un dato 
queda 


— El registro de estado (P). Es un regis- 
tro distinto de los demás. No contiene un 
número codificado con 8 ó 16 bits, como 
los anteriores, sino que tiene 8 bits cada 
uno, con un significado distinto. Cada 
uno de los bits pasará de 0 a 1 cada vez 
que en el resultado de una operación se 
produzca alguno de los casos que re- 
presenta cada bit: resultado negativo, 
rebosamiento en una operación aritméti- 
ca, cero, acarreo en una suma, etc. De 
todos los bits del registro representados 
en la figura son el 0, 1, 6, 7 los que más 
nos van a interesar al comenzar a dar 
nuestros primeros pasos con la progra- 
mación del 6502. 
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Los bits del registro de estado nos sir- 
ven para realizar instrucciones condicio- 
nales según el valor de alguno de los bits, 
lo que nos indicará lo que haya ocurrido 
en la última instrucción. Existen en el jue- 
go de instrucciones del 6502 algunas 
que consisten en realizar algo (normal- 
mente un salto a otra dirección de me- 
moria) únicamente cuando se cumpla 
que alguno de los bits del registro de es- 
tado esté a 1 


| | 
Rebosamiento| Parador [Interrupción Acarreo 
programa 
Resultado Sin Modo Cero 
negativo usar decimal 
El registro P 


También existe el registro índice (1), 
que veremos a continuación, al estudiar 
los modos de direccionamiento, 

Los bits de cada registro serán, visto lo 
anterior, los siguientes: 


— Acumulador (registro de datos): 8 
bits. 

— Puntero de pila (registro de direc- 
ciones): 16 bits. 

— Reglstro de estado: 8 bits. 

— Contador de programa (registro de 
direcciones): 16 bits. 


qu Las instrucciones del 6502 


Como ya hemos dicho anteriormente, 
las instrucciones del 6502 son códigos de 
8 bits. Aquéllas que neceslten algún tipo 
de operando llevarán a continuación del 
byte de la instrucción uno o varios bytes 
con los operandos correspondientes. Así, 
una Instrucción que sea sumar un valor al 


acumulador, a continuación del byte 
con el código de instrucción deberá lle- 
var otro byte con el valor que hay que su- 
mar. El PC deberá tener en cuenta este 
tipo de instrucciones y leer después del 
código los bytes de datos que conten- 
gan. Cuando programamos en lenguaje 
máquina del 6502 normalmente se escri- 
ben los byles mediante su codificación 
en hexadecimal (8 bits = 2 cifras hexade- 
cimales). 


Métodos de 
direccionamiento 


Las instrucciones del 6502 nos permiten 
varios sistemas de direccionamiento: 


— Direccionamiento inmediato. El 
dato viene en un byte a continuación del 
byte de instrucción. 


— Direccionamiento absoluto. El dato 
está en la dirección de memoria que se 
introduce como operando en los dos 
bytes siguientes al de la instrucción. 


— Direccionamiento de página cero, 
Es como el absoluto, pero suponiendo 
que el primer byte de la dirección es 00, 
por lo que la instrucción únicamente lle- 
vará un byte con la segunda parte de la 
dirección. 


— Direccionamiento indexado. A la di- 
rección que se introduce en los dos bytes 
siguientes a la instrucción hay que sumar- 
le el contenido del registro indice (l), de 
8 bits, para obtener la dirección donde 
se encuentra el dato. 


— Direccionamiento indirecto. En los 
dos bytes siguientes a la Instrucción se 
encuentra la dirección donde está la di- 
rección donde se encuentra el dato. Esos 
dos bytes indican dos posiciones de me- 
moria por el procedimiento de página 
cero. 


El 6502 posee instrucciones que permi- 
ten obtener cada uno de los datos por 
los distintos medios de direccionamiento 
expuestos. 
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Cambio de 


coordenadas 


es una de las más útiles rutinas para cual- 

quier estudiante o profesional. Por sí mis- 
Este primer progra- ma sirve para poco, pero unida a tus pro- 
ma, que sirve para to- plos programas puede serte de mucha 
dos los ordenadores, ayuda. 


CAMEIO DE COORDENADAS 


ZAIDA 


100 REM RROOIOOROBIOIODIO ORIO IOOIPOIO OOOO OIDO DIBOIODIOORIDIBIOIDRIOIBBRRIOIORIORIORIBIGRIODER 
101 REM. XAXKKKAKAXAXA CAMBIO DE COORDENADAS DE RECTANGULAR A GIOCONDA K 


102 REM IMRROIOOIODIO POLAR Y VICEVERSA AGOIOIOOIOIGIOIODIOROR 
103 REM ORO IOOIOIOROIOOROOIOROROIORGIOROROIOIOIBIO OPIO RORPIBIO OOOO OIR PROIPJOIOROOROIPIOROJÓK 
104 REM 


105 REM MR lll lll lolo llo jjajaja lola lalalala 
106 REM GOGIOIGIOIGIOIGIOIOONNK —POR JUAN MANUEL GUTIERREZ LEITTON AGGIOGIOIOIOIORIDODÓO 
107 REM ORIO OOOO OOOO IO OOOO RIOR RORIORIOOIOOIOIOBOIOIDRIODIDRIORDRGORIORK 
108 REM 
1 09 REM OOOO OOOO OOOO OOOO ROIDOIORIOIOROORIOIOIORIÓRIROIRRODOÓN 
110 REM OOIGIOIGIOIGIOIGOOON K (Cc) EDICIONES SIGLO CULTURAL, 1987 AGOBIO 
111 REM alla jojojo lalalala jolla lola lojo jojojo loJojok 
112 REM 
sl E e > 
114 LOCATE 12,20 
115 INPUT "de rectangular a polar (S/N)”30% 
116 1F 0%="s" OR 0$="S" THEN GOTO 119 
117 1F 0$="M"” OR 0$="n" THEN GOTO 130 
>» 118 GOTO 113 
119 ELS 
120 INPUT "a=";A 
121 INPUT "b=";B 
122 LET M=SOR(A"2+B"2) 
123 1F A=0 THEN IF E<O THEN LET C=-90:GOTO 129 
124 IF A=0 THEN IF BE>0 THEN LET C=9023 GOTO 129 
125 IF A<0 THEN 1F B=0 THEN LET C=180:G60T0 129 
126 LET C=ATN(B/A) 
127 1F A<O THEN 1F E<O THEN LET C=C-180:GOTO 129 
128 IF AXO THEN IF B>0 THEN LET C=C+180:GOTO 129 
129 PRINT My"L”"30:*3":G0TO 1389 
130 CLS 
131 INPUT "modulo="3M 
132 INPUT "argumento=";0 
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133 LET A=MXCOS(C) 
134 LET M=MXSIN(C) 


137 PRINT Az” + Oj" 
138 LOCATE 12,20 


140 A$=INKEYS: IF At="" 
141 CLS 

142 LOCATE 1,1 

143 PRINT "quiere seguir (S/N)"; 

144 INPUT As 

195 IF A$="s” OR A$="S" THEN GOTO 100 
146 CLS 
147 PRINT "AD 1 0S” 
148 PRINT *”- p 
149 PRINT 

150 PRINT 

151 PRINT 

152 PRINT 


THEN 140 


El programa puede funcionar perfecta- 
mente sin cambios en el IBM pc, xt y at, 
en todos los compatibles de IBM y en el 
AMSTRAD. Para el resto de los ordenado- 
res te propongo las siguientes modifica- 
ciones. 


COMMODORE: 


113 PRINT CHR$(147) 

114 POKE 214,12:POKE 211,19 

119 PRINT CHR$(147) 

130 PRINT CHR$(147) 

138 POKE 214,12:POKE 211,19 

140 GET A$:IF A$="" THEN GOTO 140 
141 PRINT CHR$(147) 

142 POKE 214,1:POKE 211,0 

146 PRINT CHR$(147) 


MSX: 


114 LOCATE 20,12 
138 LOCATE 20,12 
142 LOCATE 1,1 


SPECTRUM: 


114 PRINT AT 12,2; 
138 PRINT AT 12,2; 
142 PRINT AT 0,0; 


La función de este programa es pasar 
de coordenadas polares a rectangulares 
y de rectangulares a polares. Al principio 
del programa (línea 115) se pregunta al 
usuario cuál de las dos cosas quiere ha- 
cer. 


135 IF B<O THEN PRINT Az"-("3ABS(B)3")j”:GOTO 138 
136 1F B>0 THEN PRINT Aj3"*"3B3"3":60T10 138 


139 PRINT "pulse una tecla para continuar" 


a Notas sobre el programa 1 


En el caso de que utilices esta rutina en 
uno de tus programas, esta línea la ten- 
drás que quitar, y llamar a la línea 119 
para pasar de coordenadas rectangula- 
res a polares, o a la línea 130 para pasar 
de polares a rectangulares. 

Si vas a utilizar este programa como 
una rutina de tus programas tendrás que 
hacer las siguientes modificaciones: 


1. Quitar el INPUT de la línea 115, así 
como las líneas 116 y 117, como ya he- 
mos dicho arriba. 

2. Quitar las líneas 119, 120 y 121. Los 
valores de A y B tendrás que darlos por 
programa. 

3. Quitar las líneas 129 y 130. El resul- 
tado del programa se te devuelve en las 
variables numéricas M y C. 

4. Quitar las líneas 131 y 132. Si eliges 
pasar de coordenadas polares a rectan- 
gulares, los valores de M y de C tendrás 
que darlos por programa. 

5. Quitar las líneas que van desde la 
135 hasta el final del programa. El resul- 
tado de la operación se devuelve en A y 
en B. 

6. Tendrás que poner en alguna par- 
te del programa un RETURN para que, 
cuando termine el cálculo, se devuelva 
el control al programa principal. 


1 Awari 


este juego de mesa (o de suelo) es ori- 
a'nario del antiguo Egipto. También se le 
conoce con el nombre de WARI o MAN- 
TANA. Los africanos dicen que es un «JUE- 
50 DE HOMBRES», pero también pueden 


jugar a él las mujeres, y de hecho, cuan- 
do no están sus maridos, juegan. 

La versión que proponemos aquí es un 
poco más sencilla que la que se juega 
en la realidad. Esto es así para no hacer 
el programa más largo de lo que ya es y 
para que las reglas del juego no sean tan 
complicadas. 


LET 


HI A MM MM MIE Dd MM ME MEM ME e DI MIE MI DI EI DH dl dd dd dl dl dd 
HH El 
A + 
* + 
*k NM 
A > 
Ak *K 
A 
A 


ABAA —RRRRR 


T11III 
1 


HH 
* ** 
KK ** 
FENOMENO MMM PER ME IEHEMRE MEP MRRE ME MEME RRE RARE HR AAA 


es 
eee 
AMAR REALIZADO FOR FRANCISCO MORALES GUERRERO — HI: 
Me MM NH MMMM HEM MIMI RMN RIMINI 


AAA 
HOM: MMM IE MMM MM MMM IM MM MIMI IA AM 
HARE (c) EDICIONES SIGLO CULTURAL, 1987 AHI 
HH MMM MM LM MIN MM IMM IMEI A MIA 


N=0 


DIM B(13):DIM G(13):DIM F(50) 


CLS 
PRI 
FOR 


NEX 
PRI 
G0S 


LOCATE 16,3:PRINT "(c) Ed. 


FOR 
NEX 
Loc 
FRI 
LET 
IF 

IF 

OS 
CLS 
605 
Loc 
FOR 


NEX 
LOC 
PRI 
PRI 
LET 
FOR 


NEX 
LET 
LET 
LET 
LET 
GOS! 


a 
I=1 TO 17 

PRINT "*"3TAB(90)3 "we" 

1d 

INT 16 6 0 E E MEM Md ME ME DE MIEDO HE MIMI 

UB 306 

Siglo Cultural" 

l=1 TO 2000 

TI 

ATE 12,3 

NT "Quieres ver las instrucciones S/N " 
A$=INKEY$: IF Ag="" THEN GOTO 114 

Af="n" OR As$="N" THEN GOTO 118 

Asf<5>"s" AND As$<>"S" THEN GOTO 112 

UB 277 


UE 306 
ATE 24,1 
I=1 TO 4 
FPRINT 
MT 
ATE 6,1:PRINT "=============ss=eoseonoooceosmo 
NT 
NT 
E=0 
I=0 TO 12 
LET B(1)=3 
gd 
2=0 
F(N)=0 
B(13)=0 
B(6)=0 
UB 204 


LOCATE 16,1 


PRI 


NT" 


LOCATE 16,1 


139 PRINT "MUEVES TU "¡:GOSUE 174 
140 IF E=0 THEN GOTO 159 
141 1F M=H THEN GOSUB 170 
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142 IF E=0 THEN GOTO 159 

143 LOCATE 16,1 

144 PRINT " a 
145 LOCATE 16,1 

146 PRINT "MI MOVIMIENTO ES "3 

147 GOSUB 240 

148 IF E=0 THEN GOTO 159 

149 1F M=H THEN PRINT ",";2:GOSUB 240 
150 FOR I=1 TO 1500 

151 NEXT 1 

152 IF E>0 THEN GOTO 135 

153 LOCATE 165,1 

154 PRINT " a 
155 LOCATE 16,1 

156 PRINT "PULSA UNA TECLA PARA VER MI MOVIMIENTO" 
157 LET A$=INKEY$: 1F As="" THEN GOTO 157 

159 IF E>0 THEN GOTO 135 


159 PRINT 

160 FOR I=1 TO 1500 

161 NEXT I 

162 LOCATE 16,13 

163 PRINT " y 


164 PRINT "FIN DEL JUEGO. ":PRINT 

165 LET D=B(6)-E(13) 

166 IF D<O THEN PRINT "TE HE GANADO POR "¿-D;" PUNTOS":GOTO 315 
167 LET N=N+1 

168 1F D=0 THEN PRINT “HEMOS EMPATADO":GOTO 315 
169 PRINT "ME HAS GANADO POR "3D; "PUNTOS":GOTO 315 
170 LOCATE 16,1 

171 PRINT " “ 
172 LOCATE 16,1 

173 PRINT "MUEVE OTRA VEZ "y 

174 INPUT M 

175 IF M<7 THEN IF M>0 THEN LET M=M-1:G0TO 188 

176 LOCATE 16,1 

177 PRINT * “ 
178 LOCATE 16,1 

179 PRINT * “ 
180 LOCATE 16,1 

181 PRINT “MOVIMIENTO NO PERMITIDO" 

182 BEEP: BEEP 

183 FOR I=1 TO 1000 

184 NEXT 1 

185 LOCATE 16,1 

186 PRINT " " 
187 GOTO 170 

188 IF B(M)=0 THEN GOTO 179 

189 LET H=5 

190 GOSUB 192 

191 GOTO 206 

192 LET K=M 

193 GOSUB 227 

194 LET E=0 

195 IF K>6 THEN LET K=k+7 

196 LET C=C+1 

197 1F 0<9 THEN LET F(N)=F (N)*6+K 

198 FOR I=0 TO 5 

199 IF E(1)<>0 THEN GOTO 202 

200 NEXT 1 

201 RETURN 

202 FOR I=7 TO 12 

203 IF E(1)<>0 THEN LET E=1:RETURN 

204 NEXT 1 

205 RETURN 

206 LOCATE 10,1 

207 PRINT 

208 PRINT " * " 

209 FOR I=12 TD 7 STEP -1 

210 GOSUB 224 

211 NEXT 1 

212 PRINT:PRINT " A 

213 LET 1=13 

214 GOSUB 224 

215 PRINT " "3 

216 PRINT B(6) 

217 PRINT " "3 

218 FOR I=0 TO 5 

219 GOSUB 224 

220 NEXT 1 

221 PRINT 

222 PRINT 

223 RETURN 


224 IF B(1)<10 THEN PRINT " "; 
225 PRINT B(1)5 

226 RETURN 

227 LET P=B(M) 

228 LET B(M)=0 p 

229 FOR P=P TO 1 STEP -1 

230 LET M=M+1 


231 IF M>13 THEN LET M=M-14 
232 LET B(M)=B(M)+1 
233 NEXT FP 


234 IF B(M)=1 THEN 1F M<>6 THEN 1F M<>13 THEN 1F B(12-M)<>0 THEN GOTO 236 
235 RETURN . y , 

236 LET B(H)=B(H)+B(12-M)+1 
237 LET B(M)=0 

238 LET B(12-M)=0 

239 RETURN 

240 LET D=-99 

241 LET H=13 

242 FOR I=0 TO 13 

243 LET G(1)=B(1) 

244 NEXT 1 

245 FOR J=7 TO 12 

246 IF B(J)=0 THEN GOTO 269 
247 LET G=0 

248 LET M=J 

249 GOSUB 227 

250 FOR I=0 TO 5 


251 IF B(1)=0 THEN GOTO 257 

252 LET L=B(1)+1 

253 LET R=0 

254 IF L>13 THEN LET L=L-14:1LET R=1:G0TO 254 

255 IF B(L)=0 THEN IF L<>6 THEN IF L<>13 THEN LET R=B(12-L)+R 
256 1F R>Q THEN LET Q=R 


257 NEXT 1 

258 LET Q=B (13)-B(6)-0 
259 IF C>8 THEN GOTO 265 
260 LET K=J 


261 IF K>6 THEN LET K=KkK-7 

262 FOR I=0 TO N-1 

263 IF F(N)x*6+K=INT(F(1)/6" (7-C)+.1) THEN LET Q=0-2 
264 NEXT 1 

265 FOR I=0 TO 13 

266 LET B(1)=G6(1) 


267 NEXT 1 

268 IF Q>=D THEN LET A=J:LET D=Q 
269 NEXT J 

270 LET M=A 

271 PRINT CHR$(42+M) 3 

272 GOTO 192 

273 FOR 1=0 TO N-1 

274 PRINT E(1) 

273 NEXT 1 

276 END 

277 REM 

278 REM mea ME 

279 REM * INSTRUCCIONES * 

280 REM e AM RA 

281 REM 

282: CLS 

283 PRINT TAB(14)3 "INSTRUCCIONES" 
284 PRINT TAR(13) q". yl 


285 PRINT 

286 PRINT " El juego del AWARI (tambien llamado WARI O MANCALA) es muy antigu 
O, tanto que ya se practicaba en el antiguo egipto." 

287 PRINT:PRINT " La forma de jugar es la siguiente:" 

288 PRINT 


289 PRINT " El tablero esta dividido en seis casi- llas en cada cara. Los movimi 

entos se realizan-cogiendo todas las fichas de" 

290 PRINT "una cierta casilla que, no este vacia, yrepartiendo dichas fichas por 
las casi- llas contiguas hacia la derecha, ponien-" 

291 FPRINT "do una en cada casilla." 


292 PRINT 
293 PRINT " Cada torno puede ser de una o dos juga-das. Se realizara una segunda 
jugada cuando ninguna de las fichas pasa al la-do del oponente.” 


294 PRINT:PRINT "PULSA UNA TECLA"; 

2935 LET A$=INKEYS$: IF As="" THEN GOTO 295 

296 CLS 

297 PRINT " Para ganar hay que conseguir apropiarsede las fichas del oponente. E 
sto se con-sigue cuando despues de un movimiento, la ultima ficha cae en un cas 
illero que” 

298 PRINT "tiene solo una, dos o tres fichas. Todaslas fichas de dicho cubilete 
son comidas" 

299 PRINT 
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PRINT " El juego termina cuando una de las ca- ras del tablero esta vacia." 


PRINT 
PRINT "PULSA UNA TECLA" 


LET A$=INKEY*: 1F Af="" THEN GOTO 303 


CLs 

RETURN 

REA 6 6 36 6 HI 
REM * ROTUL.O "AWAR I" x* 
REA sd IMM MM IE MEM MEAR 
REM 

LOCATE S5S¿S:PRINT " $4 + 
LOCATE 6,5:PRINT "* Y, . o» 


$  4HH-— HRRH HRS 
"oq + y 


LOCATE 7,5:PRINT "HHHHH 4H RRA ARA + 


LOCATE 8,S5:PRINT "* $ "os $ 
RETURN 
PRINT:PRINT 


PRINT "(HECHAMOS OTRA PARTIDA? (S/N) 
LET As=INKEY$: 1F Aé="" THEN GOTO 317 


IF A$="s" OR As$="S" THEN GOTO 118 


IF As$<>"n" AND A$<3"N" THEN GOTO 317 


CELS 

GOSUB 306 

LOCATE 24,1 

FOR I=1 TO 4 
PRINT 

NEXT 1 

LOCATE 10,1 

PRINT 

PRINT PR 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

END 


Las reglas del juego son las siguientes: 

Este juego se realiza en una especie de 
tablero como el que se ve en la figura 1. 
En realidad cada casilla, aunque la lla- 
maremos así, no es tal casilla, sino que 
es un cuenco o un recipiente mediana- 
mente hondo dentro del cual pondremos 
las fichas. 

En la versión para el ordenador hemos 
decidido poner tres fichas en cada reci- 
piente. : 

Las dos casillas que están vacías so 
las que almacenarán las fichas que le va- 
yamos comiendo al enemigo. Este es el 
objetivo primordial del juego. Pero el jue- 
go no termina cuando nos hemos coml- 
do todas las fichas del contrincante, 
pues a veces es imposible saber cuál son 
las propias y cuáles las del contrincante, 


HEKAR HAHN 


IMA HAHAHA 


HR $ O HRRRRS 


HAIR 


sino que lo hace cuando una de las ca- 
ras se ha quedado sin fichas. En ese mo- 
mento se ve la diferencia de fichas que 
hay entre los dos jugadores y gana el 
que más tiene. 

Para mover las fichas sólo hay que de- 
cir el número de casilla sobre la que que- 
remos actuar. Una vez sabido esto, se re- 
parten todas las fichas que haya en di- 
cha casilla entre las casillas contiguas 
por la derecha y poniendo una ficha en 
cada casilla. 

Si nos fijamos en la figura 1, veremos 
que en la posición a, en la casilla 3 hay 
tres fichas. Si movemos desde la casilla 
3, ésta se quedará vacía y se pondrá una 
ficha en la 4, otra en la 5 y otra en la 6. 
Con ello estas tres casillas pasarán a te- 
ner 4 fichas. 


Casilla almacén 
del ordenador 


la Tablero de Awari. 

5e come una ficha del contrincante 
cuando, al hacer un movimiento, se cam- 
ma de lado (se pasa al lado del contrin- 
cante) y la última de las fichas a colocar 
zae en una casilla que no esté vacía y 
ue tenga como máximo tres fichas. El ju- 
sador que haga dicha jugada cogerá to- 
Sas las fichas de dicho cuenco y las pon- 
srá en el cuenco de recuento. 

Cabe la posibilidad de hacer dos juga- 
Jas seguidas. Esto sucede cuando la úl- 
“ma ficha ha caído en el primer casillero 
Jel contrincante. 


Ejemplo de ejecución del programa Awarl. 


este programa funciona en el IBM pc, xt, 
== y compatibles, así como en el AMS- 
TRAD. Para los demás ordenadores os da- 
mos las variaciones: 


313 POKE 214,8:POKE 2 


COMMODORE: 


102 PRINT CHR$(147) 

109 POKE 214,16:POKE 211,2:PRINT "(c) 
Ed. Siglo Cultural 

112 POKE 214,12:POKE 211,2 

114 GET AS: IF A$="” THEN GOTO 114 

120 POKE 214,23:POKE 211,0 

POKE 214,6:POKE 211,0:PRINT 


136 POKE 214,16:POKE 211,0 

138 POKE 214,16:POKE 211,0 

143 POKE 214,16:POKE 211,0 

145 POKE 214,16:POKE 211,0 

153 POKE 214,16:POKE 211,0 

155 POKE 214,16.POKE 211,0 

157 GET AS:IF A$="" THEN GOTO 157 

170 POKE 214,16:POKE 211,0 

172 POKE 214,16:POKE 211,0 

176 POKE 214,16:POKE 211,0 

178 POKE 214,16:POKE 211,0 

180 POKE 214,16:POKE 211,0 

185 POKE 214,16.POKE 211,0 

206 POKE 214,10:POKE 211,0 

282 PRINT CHR$(147) 

295 GET AS:IF AS="" THEN GOTO 295 

296 PRINT CHR$(147) 

303 GET A$:1F A$="" THEN GOTO 303 

304 PRINT CHR$(147) 

310 POKE 214,5:POKE 21 

311 POKE 214,6:POKE 21 

312 POKE 214,7:POKE 21 
1 


, 


1,5 
1,5 
1,5 
1,5 
320 PRINT CHR$(147) 

326 POKE 214,10:POKE 211,0 


MSX: 


Lo único que hay que hacer para que 
el programa funcione en el MSX es cam- 
blar el orden de los argumentos de todas 
las sentencias LOCATE, Esto es, si apare- 
ce la instrucción LOCATE 12,1 nosotros 
tendremos que poner LOCATE 1,12. 


La versión para SPECTRUM de este pro- 
grama aparecerá en tomos posteriores. 


E 


Este programa es una rutina en CODI- 
GO MAQUINA para el SPECTRUM que nos 
permitirá la impresión en pantalla de 
cualquier mensaje con las letras en tres 
dimensiones. 

La rutina no es reubicable. Esto es, no 
se puede localizar en cualquier parte de 


Letras en tres dimensiones 
para SPECTRUM 
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la memoria, sino sólo en la posición 
64500 de ésta. No es reubicable debido 
a que tiene saltos absolutos y subrutinas. 


1 POKE 23658,0: CLEAR 64499: 
GO SUB 1000 
2 CLS : PRINT AT 10,1 INK 6; 
"QUIERES GRABAR EL PROGRAMA S/N" 
3 IF INKEY$="n" THEN GO TO 6 
4 IF: INKEY$="s" THEN FRINT A 
T 15,9; FLASH 1;" PULSA ENTER ": 
PAUSE 10: FOR I=1 TO 50: NEXT 1 
: PAUSE O: POKE 23736,181: SAVE 
"LETRAS 3-D" LINE 11: GO TO 6 
560 TO 3 
6 CLS 2: PAUSE 32 FOR i=0 TO 3 
Oz NEXT i2 PRINT AT 10,13 INK Sy 
" GRABO EL CODIGO MAQUINA S/N " 
7 IF INKEY$="n" THEN 60 TO 9 
990 
8 IF INKEYS$="s" THEN PRINT A 
T 15,9; FLASH 13" PULSA ENTER ": 
PAUSE 3: FOR I=1 TO 50: NEXT 1: 
PAUSE 0: POKE 23736,181: SAVE " 
L. 3-DCODE "CODE 6£64500,483: GO T 
O 9990 - 
9 GD TO 7 


10 REM 
POSICION SIGNIFICADO 
LONGITUD DEL MEN 
23300 SAJE MULTIPLICADO 
FOR OCHO. 


11 REM 
POSICION SIGNIFICADO 
23302 XSIZE 
23303 YSIZE 
23311 XFOS 


23312 YPOS 


15 PRINT INK OAT 20,03Ms1 PO 
KE 23300,LEN M$x8 

20 FOKE 23311,XPOS: POKE 23312 
,YPOS 

30 POKE 23302,XSIZE: POKE 2330 
3,YSIZE 

40 INK Ir 


RANDOMIZE USR 64500 


50 RETURN 

1000 INK 6: PAPER O: BDRDER Oz C 
LS : PRINT AT 0,63 INK 4; 1985 

y Fco. Morales. "2 INK 52: PLOT 40 
165: DRAW 179,0 

1010 INK 6: PRINT *'" ESTE ES UN 
PROGRAMA QUE TE PER-MITIRA LA C 
REACION DE  MENSAJESDE CUALQUIE 
R TIPO EN TRES DIMEN-SIONES."- 
1020 PRINT ““" PARA UTILIZARLO S 
OLO HAS DE DAREL MENSAJE A IMPRI 
MIR, LA POSI-CION DONDE QUIERES 
QUE LO IMPRI-MA Y LA ALTURA Y 
ANCHURA EN LAQUE LO QUIERES.” 
1030 INK 7: PRINT *“"- EL MENSAJ 
E IRA EN M$"''"- LA POSICION EN 
XPOS E YPOS""'“"- LA ALTURA Y ANC 
HURA EN YSIZE Y XSIZE RESPECTIVA 
MENTE." 

1040 PRINT hOz INK 2; FLASH 173" 
PULSA UNA TECLA PARA CONTINUAR " 
1050 PAUSE O 


1060 INK 63 CLS 2 PRINT AT 9,9; 

FLASH 13 "CARGANDO DATAS"¡AT 11,6 

¡ FLASH 13 INVERSE 15 INK 43" ES 

PERA UN MOMENTO. *" 

1070 PRINT AT 15,63 INK 57 "CHECK 

SUM = y * 

1080 LET CONTA=0: LET POS=645008+ 
RESTORE 7000 

1090 FOR 1=0 TOD 482: READ Az POK 

E POS+1,A: LET CONTA=CONTA+A: PR 
INT AT 15,17¡CONTA;* NEXT 1 

1092 IF CONTA<>40670 THEN GO TO 
6000 

1100 CLS 2 PRINT AT 10,03 INK 43 
"LETRAS 3-D INSTALADO EN LA 6450 

qu 

1110 PRINT AT 12,0; FLASH 13”PUL 

SA UNA TECLA PARA DEMOSTRAION"+ 

PAUSE O 

1120 LET Mé$="letras"1» REM MENSAJ 

E 

1130 LET XPOS=02 REM POSICION EN 
X 

1140 LET YPOS=95: REM POSICION E 
N Y 

1150 LET XS1ZE=4: REM ANCHURA 
1160 LET YSIZE=11: REM ALTURA 
1170 LET 1=2: CLS 1: GO SUB 10 
1180 LET I=4: LET M$="3-D E 
ET XPOS=39: LET YPOS=40: LET XSI 
ZE=9: LET YSIZE=b61 60 SUB 10 
1190 LET I=5: LET M$="PULSA UNA 
TECLA": LET XPOS=6: LET YPOS=16:2 
LET XSIZE=2: LET YSIZE=21 60 SU 
B 10 

1200 PAUSE O: RETURN 

£000 CLS : PRINT  INK 43AT 10,12 
FLASH 13 "ERROR"3 FLASH 03" EN D 
ATAS, PRUEBA DE NUEVO"; INK £6;AT 
15,93 FLASH 1;" PULSA ENTER ": P 
AUSE 3: PAUSE O: GO TO 20000 
6300 

6510 REM rr A A 
6520 REM. **x*x* DA TAS ARENA 
E AA 
65340 


7000 DATA 0,217,229,217,58,4,91, 
50,17,91,50,19,91,62,15,50,18,91 
,50,5,91,58,6,71,71 


7005 DATA 5,58,17,91,79,167,129, 
16,252,71,58,15,91,167,128,50,10 
,91,58,7,91,71,5,58,19 


7010 DATA 91,214,8,79,167,129,16 
,252,71,58,16,91,167,128,50,11,9 
1,205,101,252,58,18,91,61,254 


7015 DATA 7,50,18,91,50,5,91,32, 
193,62,15,50,18,91,50,5,91,58,17 
,91,60,42,19,91,189 


7020 DATA 50,17,91,50,4,91,32,16 
9,217,225,217,251,201,62,0,50,14 
,191,205,169,253,42,4,91 68 


7025 DATA 77,205,160,252,202,148 
,253,58,6,91,71,197,58,10,91,128 
,79,58,11,91,71,205,229,34,14 


7030 DATA 0,58,7,91,71,17,255,2 
55,205,186,36,193,120,61,71,254, 
255,32,223,195,172,252,205,170,3 
4 

7035 DATA 71,4,126,7,16,253,203, 
71,201,58,4,91,79,58,5,91,60,71, 
205,160,252,32,39,58,4 


7040 DATA 91,61,79,58,5,91,71,20 
5,160,252,32,25,58,10,91,79,58,1 
1,91,71,205,229,34,58,6 


7045 DATA 91,79,58,7,91,71,17,1, 
1,205,1865,36,58,4,91,79,58,5,91, 
£1,71,205,140,252,32 


7050 DATA 39,58,4,91,60,79,58,5, 
51,71,205,160,252,32,25,58,8,91, 
79,58,13,91,71,205,229 


7055 DATA 34,58,6,91,79,58,7,91, 
71,17,1,1,205,186,36,58,4,91,79, 
32,5,91,60,71,205 


700 DATA 160,252,32,23,58,8,91, 
775,58,9,91,71,205,229,34,58,6,91 
,739,5,0,17,1,1,205 


7065 DATA 186,365,58,4,791,60,79,5 
82,5,91,71,205,160,252,32,23,58,1 
2,71,79,58,9,91,71,205 


7070 DATA 229,34,14,0,58,7,91,71 
+17,255,255,205,186,36,58,4,91,7 
3,58,5,91,60,71,205,160 


7075 DATA 252,40,5,62,1,50,14,91 
,58,4,91,50,79,58,5,91,71,205,16 
0,252,40,7,58,14,91 


7080 DATA 60,50,14,91,58,14,91,2. 
54,1,40,25,58,8,91,79,58,11,91,7 
1,205,229,34,58,6,91 


7085 DATA 79,58,7,91,71,17,1,1,2 
05,186,36,201,58,6,91,71,58,10,9 
1-128,50,8,91,58,7 


7090 DATA 91,71,58,11,91,128,50, 
9,91,58,6,91,135,71,58,10,91,128 
+50,12,91,58,7,91,71 


7095 DATA 58,11,91,144,50,13,91, 
201,0 


9990 CLS : PRINT AT 0,6; INK 45" 
1985, Fco. Morales."3hO0jAT 1,9 
3 INVERSE 1:" LETRAS 3-D "z INK 
S: PLOT 40,165: DRAW 179,0 
9999 INK 3: FOR i=0 TO 3; PLOT 1 
O+i,20+i: DRAW 0,110-2xi: DRAW 2 
35-2*i,0: DRAW 0,-110+2x*i1t DRAW 
—=235+2*1,0:1 NEXT i1 LET i=61 LET 
m$="ADIOS": LET XPOS=25: LET YP. 
0S5=40: LET XSIZE=5: LET YSIZE=10 
1 G0 SUB 10: FAUSE O 


Lo primero que tenemos que hacer es 
roducir el programa por el teclado del 
mmaenador. Ten mucho cuidado con los 
mámeros de las líneas DATA para no equi- 
wocarte. De todas maneras el programa 
ea una rutina de comprobación que te 
ra si te has equivocado. 

na vez que esté el programa en me- 
mona ejecutalo con la sentencia RUN y 
=spera que el ordenador meta el código 
máquina en su memoria. Una vez hecho 
==0 te aparecerá en pantalla una de- 
mostración de lo que es capaz de hacer. 
Taando el programa te pregunte si quie- 
“e. grabarlo, introduce en tu cassette 


una cinta virgen rebobinada, pulsa a la 
vez las teclas RECORD y PLAY, espera 
unos 10 segundos y pulsa la tecla $ del 
SPECTRUM. A continuación se grabará el 
Pro gIarOS en la cinta. 


Demostración del programa «Letras 3-D», 
Una vez que se haya grabado el pro- 

grama el SPECTRUM te preguntará si quie- 

res grabar la rutina en CODIGO MAQUINA. 


Si te interesa hacerlo, sólo tienes que pul- 
sar la tecla $ y el ordenador lo hará. 


Notas sobre el programa 3 


Para utilizar esta rutina en tus progra- 
mas sólo tienes que hacer lo siguiente: 

1. Introducir esta línea al principio del 
programa: 


10 CLEAR 64499:LOAD '"”"* CODE 


2. Introducir esta rutina al final del 
programa: 


9950 PRINT INK 0; AT 20,0;¡M$:POKE 
23300,LEN M$"8 
9960 POKE 233 
23312,YPOS 
9970 POKE 23302,XSIZE:POKE 
23303,YSIZE 

9980 INKI: RANDOMIZE USR 64500 
9990 RETURN 


Para usar esta rutina debes de saber 
que: 


— El mensaje a imprimir ha de ir alma- 
cenado en M$. 

— La posición en la pantalla, donde 
aparecerá el mensaje, ha de ir en XPOS 


11,XPOS:POKE 


E PROGRAMAS 


y en YPOS. Siendo XPOS la coordenada X 
de la pantalla y YPOS la coordenada Y. 

— La altura del mensaje tiene que ir al- 
macenado en YSIZE. 

— La anchura debe ir en XSIZE. 

— El color tiene que ir en |. 

— Si necesitas efectos de FLASH o de 
BRIGHT, tendrás que ponerlos como una 
instrucción normal antes de llamar a la: 
rutina. 


Mensaje de despedida del programa 1. 


Este programa empieza en la dirección 
64500 y llega hasta el final de la memo- 
ria. Internamente utiliza la zona interme- 


SUPERGRAFICOS 


dia de impresora para almacenar una 
serie de variables. Las más importantes 
son: 


— 23300. Enesta dirección ha de irla 
longitud de la cadena multiplicada por 
ocho. 


— 23302. XSIZE 
— 23303. *YSIZE 
— 23311. XPOS 
— 23312. YPOS 


El mensaje a imprimir ha de estar impre- 
so en la columna 0 de la linea 20. 

Para llamar a la rutina sólo hay que ha- 
cer: 


RANDOMIZE USR 64500 


CAT 
== Supergráficos 

Este es un programa realmente útil 
para todo programador o usuario. Nos 
servirá para dibujar en la pantalla de 
nuestro ordenador cualquier tipo de di- 
bujo en color o en blanco y negro. Tam- 
bién nos permitirá copiar el contenido de 
la pantalla en la impresora. 

Este programa sólo funciona en los or- 
denadores IBM pc, xt, at y compatibles. 
Para el resto de los ordenadores irá apa- 
reciendo en sucesivos tomos. 


A ele 


* 

* PPPP. EEEEE RRRR 
* P PE ER R 
* Li PIE E R R 
* SRPREEE RRERR 
* P EME RR 

* E E ERR 

* uvU P EEEEE R KR 
* 

* 


Ao MMM e e 0 DD DE MED AM MEME DE DE HD E 0 A dl MIE DD MEE MIE DE MER DEM MIER N A M 


G 
G 
[E] 
6 
G 


GGG  RRRR 
GR 


G6G6 R R A 1 


ARA FFFFF 111 + CCC 
R c 
R R 
GG RRRR 
G RR 
GRR 


A 

A 
AABA 
A s 
A 


00000 


1 
1 
1 
1 
1 


* 
* 
* 
* 
3 
* 
* 
1 SSsSs + 
* 
* 


MMM HR MM MM MI E HE MM MI E E MM RIIIE HDI MM E DM A DE JE AR EMI MIA MEE 
IMA RIRS REALIZADO FOR FRANCISCO MORALES GUERRERO 446 4d 10069 0 MM IEA 
MANI MIR MR MNR E MH IE E HH HH ID e DM MH DD E E DD HI EE DE IIA II AA 


MIE ME 0 MM IIA NM IIA II NI 
HAM RIRARRARR  (C) EDICIONES SIGLO CULTURAL, 1987 HAIR MIMI NI 
AMM HINDI 6 MM MM MMMM 


* INICIALIZACION DEL PROGRAMA * 


OFF 
RT=1 TO 10 

KEY(RT) OFF 

NEXT RT 

SCREEN 1 


FOR 


44 COLOR 16,1,,,3 

45 WIDTH 80 

4b LET X=100 

47 LET Y=100 

48 LET X1=0 

49 LET Yi=0 

50 LET SS=1 

51 DIM AZ(10000) ,B% (10000) ,CZ(3000) ,D% (2000) ,E% (2000) 
55 GOSUB 173 


56 CLS 
60 LOCATE 21,1. 
61 INPUT "Numero de puntos en X (320 0 640) = "¿A 


62 1F A<>320 AND A<>640 THEN 60 ELSE IF A=320 THEN WIDTH 40:LET SW=1 ELSE LET SW 
=2 

63 REM 

64 REM 2643626 dd ed II IN 

65 REM * PROGRAMA PRINCIPAL * 

b6 REM 34d 3 dd dl Md A II ER 

67 REM 

68 LET PP=0 

69 LET II=1 

70 COLOR PP,11 

71 CLS 

72 GOSUB 105 

73 GET (0,0)-(319*SW,199) ,B% 

74 P=PDINT(X,Y):1F P<>0 THEN Pi=0 ELSE Pi=1 

73 PSET(X,Y),P1 

76 A$=INKEYS: 1F As="" THEN 76 

77 A=ASC (AS) 

78 IF LEN(A$)=1 THEN 83 

79 1F MID*$(4$,2,1)="K" THEN PSET(X,Y) ¿Pr X=Xx-S5-SS* (X-S55<0): GOTO 74 

30 IF MID$(A4$,2,1)="M" THEN PSET(X,Y) ¿Pz X=X+S85+99* (X+88>319*SW) : GOTO 74 

51 IF MIDS$(A4$,2,1)="H" THEN PSET(X,Y) ¿Pz Y=Y-SS-SS5S* (Y-S8<0): GOTO 74 

82 IF MID$(8$,2,1)="P" THEN PSET(X,Y) ,P: Y=Y+SS+5S* (Y+S8>191):G0TO 74 

83 IF A=83 OR A=115 THEN M*="ESCALA ACTUAL ="+STR$(SS)+" 1 
NTRODUZCA NUEVA ESCALA (1-9)"2LO=2:MA+="9":MI+$="1“:G0OSUB 129: 1F VAL1(D$)>9 AND D+ 
<2"" THEN 83 ELSE SS=VAL (D+) 

84 IF A=80 OR A=112 THEN PSET(X,Y),11:X1=X:Y1=Y:SWW=1:GOTO 74 

85 IF A=79 OR A=111 THEN PSET(X,Y),FP:X1=X:Y1=Y:SWW=2:GOTO 74 

86 1F A=67 OR A=99 THEN LO=2:MA+$="4":MI$="0":¿M*$="COLOR":GOSUB 129: 1F VAL. (D+F+)>4 A 
ND D$<>"" THEN 85 ELSE II=VAL (D+4) 

87 1F A=76 OR A=108 THEN PSET(X,Y) ,P:GOSUB 105:LINE (X1,Y1)-(X,Y) ,-11% (SWW=1) -FP* 
(SWW=2):X1=X:Y1=Y:G0OTO 74 

88 IF A=70 OR A=102 THEN PSET(X,Y) ,P:GOSUB 105: DD=POINT(X,Y):FOR I=X TO 319*SW: 1 
F POINT(1I,Y)<>DD THEN DD=FDINT(1,Y):PAINT(X,Y),11,DD:GOTO 74 ELSE NEXT 1:G0TO 74 
89 IF A=27 THEN PSET(X,Y),P:GOSUB 111:G0TO 74 

90 1F A=75 OR A=107 THEN PSET(X,Y),P:GET (0,0)-(319,191),BX%:GO0TO 74 

91 IF A=74 OR A=106 THEN PSET(X,Y),P:PUT (0,0),B%,PSET:GOTO 74 

92 IF A=81 OR A=113 THEN PSET(X,Y),P:M$="( TERMINAMOS EL PROGRAMA ? (S/n)":MA$=" 
2":1MI$="A":LO0=2:GOSUB 129: 1F D$<>"n" AND D$<>"N" AND D$<>"S" THEN 92 ELSE IF D*$= 
"S" THEN 152 

93 IF A=90 OR A=122 THEN PSET(X,Y),P:Mté="( BORRAMOS LA PANTALLA 2 (S/n) ":MIS="A" 
:MA$="2":L0=2:GOSUB 129: 1F D*$<>"N" AND D$<>"n" AND D$<>"S" THEN 93 ELSE IF D$="S 
" THEN CLS:GOTO 74 

94 IF A=68 OR A=100 THEN PSET(X,Y),P:GOSUB 105: N$="DIRECTORIO”:GOSUB 166: GOSUB 1 
S5S9:PRINT "PULSA UNA TECLA": As=INPUTS$(1):GOSUB 111:GOTO 74 

95 IF A=66 OR A=98 THEN PSET(X,Y),¿P:GOSUB 105:N$="BORRAR UN PROGRAMA" :GOSUB 166: 
GOSUB 158: INPUT "NOMBRE DEL FICHERO = ",A+$:KILL A$:GOSUB 111:GOTO 74 

96 IF A=82 OR A=114 THEN PSET(X,Y),P:GOSUB 105%: N$="RENOMBRAR UN PROGRAMA": GOSUB 


166:GOSUB 158: INPUT "NOMBRE ANTIGUO DEL FICHERO = ",A+:PRINT: INPUT"NOMBRE MODERN 
O DEL FICHERO = ",B+$:NAME AS AS B*$:GOSUB 111:GOTO 74 
97 1F A=77 OR A=109 THEN PSET(X,Y),P:DEF SEG=%HE800:M$="NOMBRE PARA GRABAR = ":M 


A$="z"¿MI$="A":LO=12:GOSUB 129; 1F Dé="" THEN GOTO 74 ELSE BSAVE D+,0,16300: GOTO 
74 


98 IF A=78 OR A=110 THEN PSET(X,Y),P:DEF SEG=2£HBB00:M$="NOMBRE PARA GARGAR = ":M 
Aas="2":MI$="A":LO=12:GOSUB 129: 1F Ds$="" THEN GOTO 74 ELSE BLOAD D+:GOTO 74 
99 1F A=88 OR Asi20 THEN FSET(X,Y),P:GOSUB 117:LOCATE 22,1:PRINT "X="¿X3"  "¿"y= 


"¡Y:LOCATE 23,1:PRINT "PULSA UNA TECLA: "A$=INPUTS (1) : GOSUB 123 

100 1F A=63 THEN PSET(X,Y) ,P:GOSUB 173 

101, IF (A=87 OR A=119) AND SSW=0 THEN PSET(X,Y) ,P:X2=X: Y2=Y:SSW=1:GOTO 74 
102 IF (A=87 OR A=119) AND SSW=1 THEN PSET(X,Y),P2:GET (X2,Y2)-(X,Y) ,DZ2:AX=X-X2:A 
Y=Y-Y2 1 X=X21 Y=Y21 GET (X,Y)-(X+AX,Y+AY) EZ: SSW=0: GOTO 204 

103 PSET(X,Y),P:GOTO 74 

104 REM 

105 REM Mm A 6 MH IA AE 

106 REM * ALMACENA PANTALLA +* 

107 REM IMA RM 

108 REM 

109 GET (0,0)-(319*5W,199) 4%: RETURN 

110 REM 


REA RIA 
REM * RECUPERA PANTALLA * 
REM me HI DE MA MH 


PUT (0,0) ,A%,PSET: RETURN 
REM de 0 MI MIE MIRA 


REM * ALMACENA 3 LINEAS INFERIORES * 
RE e LIE NM AM 


GET (0,160) -(319*5W,199) ,0%: RETURN 


CAE 


REM * RECUPERA 3 LINEAS INFERIORES * 
A AN 


PUT (0,160) ,0%,PSET: RETURN 


REM dd MH DH E HH 
REM * ENTRADA DE DATOS *x 
REM MMM E E MH IE 


GOSUB 117 
LOCATE 21,1 


135 PRINT SPC(120*SW) ; 

136 LET Ds="" 

137 LET LO=0 

138 LOCATE 22,1 

139 PRINT M$3" 3 "¿CHR$(29)5 

140 C$=INKEYS$ 

141 IF C$="" THEN GOTO 140 

142 IF C$=CHR*$(8) AND LO>0O THEN LO=LO-1:D$=LEFTS$(D+,LO):PRINT CHR$ (29), "_ "¿CHR$ 
(29) 1 CHR$ (29); 

143 IF C$=CHR$(13) THEN GOTO 150 

144 IF Cs$=" " OR C3$="," THEN GOTO 144 

145 IF C$>MA+ OR C$<MI+$ THEN 140 

146 PRINT C$;"_"¡CHR$(29);5 

147 LET Dé$=D$+0s$ 

148 LET LO=LO+1 

149 IF LO<>LO THEN GOTO 140 

150 PRINT " ":GOSUBE 123: RETURN 

151 REM 

152 REM 140 06H HI MIR ER 

153 REM * SALIDA DEL PROGRAMA + 

154 REM 490006 ll 16 HI E 

155 REM 

156 GOSUB 117:LOCATE 22,1:PRINT "PULSA [ESCAFEJ PARA SALIR":*PRINT "OTRA TECLA CO 
NTINUAR":A$=INPUT+$(1): 1F ASC(A$)=27 THEN CLS: SYSTEM ELSE GOSUB 123:1G60TO 74 
157 REM 

158 REM ee 0 A 

159 REM * DIRECTORIO * 

160 REM +90 dd dd MH 


161 
1652 


REM 
CLS:LOCATE 1,1:PRINT N$z" DE LA UNIDAD "¡D+$3":" 


153 FILES D$+":x.*":PRINT:PRINT 

154 RETURN 

155 REM 

166 REM sere 36 2606 de 16 e PIAR 

167 REM * PEDIR UNIDAD DE DISCOS * 

168 REM eto dt dll dl 26 MM IMM 

159 REM 

170 PSET(X,Y),P:M$=N$+" DE LA UNIDAD = "¿MA$="2":MI$="A"1LO=2:GO0SUB 129: 1F LEN(D 
$)=2 THEN 170 ELSE IF D$="" THEN D$="A" 

171 RETURN 

172 REM 

173 REM mm d6 06626 6 dd II 

174 REM * INSTRUCCIONES +* 

175 REM med 6d 0026 M6 HA A Md 

176 REM 

177 GOSUB 105:CLS:¿LOCATE 1,1:PRINT " COMANDOS DEL PROGRAMA SUPERGRAFICOS. " 
178 PRINTIPRINT "<Q> ,..... Finaliza sesion" 


179 
180 
181 
182 
1893 
184 
185 
186 
187 
188 


PRINT "<P> ...... Dibuja un punto (PSET)" 

PRINT *<0> ,...... Borra un punto (PRESET)" 
PRINT "<L> ...... Traza una linea (LINE)" 

PRINT "<X> ...... Visualiza coordenadas" 

PRINT "<M> ...... Graba pantalla (SAVE) " 

PRINT "<N> ...... Carga pantalla (LOAD) " 

PRINT "<K> ...... Graba pantalla en memoria" 
PRINT "<I> ¿..... Carga pantalla de memoria" 
PRINT "<ESC> .... Anula la ultima accion (DEL)" 
PRINT "<Z> ...... Borra la pantalla (CLS)" 


191 PRINT 


199 REM 

200 REM Added 0 MM E DM NE HA 
201 REM * CREACION DE UNA VENTANA * 
202 REM oem dt 0 e dl IE DE MEM HE JE III 
203 ' REM 

204 As=INKEYS$: 1F Atf="" THEN 204 

205 IF A$=CHR$(13) THEN GOTO 74 


11 


210 GOTO 204 


GET (X,Y)-—(X4+AX,Y+AY) EZ: PUT 


Al principlo del programa, después de 
miroducirlo y hacer RUN, el ordenador 
nos preguntará qué tipo de pantalla que- 
emos utilizar. Caben dos posibles opcio- 
nes: 


— 320 o pantalla en color (4 colores). 
— 640 o pantalla monocromo (tinta y 
Sendo). 


Elige la que quieras utilizar en cada mo- 
mento. La diferencia entre las dos, apar- 
te de la capacidad de color, es que con 
“a primera tenemos 320 puntos de ancho 
Y con la Segunoa 64D, 


SUPER 
ANA 


Un programa para realizar 

cualquier tipo de pantalla 

y cualquier grafico en tu 
IBM PC o COMPATIBLE 


tc? Ed. Siglo Cultural, 1986 [50 


189 PRINT "<B> ...... Borra un fichero (KILL)" 
190 PRINT "XD> ...- <=. Muestra el directorio (FILES)" 
Renombra un fichero (RENAME) " 5 


192 PRINT Varia la velocidad del cursor" 
193 PRINT "<C> ...«.. Cambia color de tinta (COLOR) " 
194 PRINT "<F> ....<.. Colorea una zona (FILL)" 
195-PRINT "<W> ...... Copia parte del dibujo (bHIND)” 
196 PRINT "<?%* ...... Muestra esta pantalla" 


197 PRINT "<2,4,6,8> Mueven el cursor” 
198 PRINT:PRINT "PULSA UNA TECLA"; :A$=INPUT* (1) ;GOTO 111 


206 1F MID$(8%,2,1)="K" THEN PUT (X,Y),E%,PSET:X=X-S59-S55*(X-558<0):G0TO 211 
207 1F MID+F(A4$,2,1)="M" THEN PUT (X,Y),E%,PSET:X=X+5S+89* (X+S8>319*SW-AX) : GOTO 2 


208 1F MID$(8$,2,1)="H" THEN FUT (X,Y),EZ,PSET: Y=Y-S58-S5* (Y-S5<0):G0TO 211 
209 1F MID*$(A4$,2,1)="P" THEN PUT (X,Y) ,EX,PSET: Y=Y+59+588+* (Y+58>199-AY):+G0TO 211 


(X,Y),DZ,FPSET: GOTO 204 


Las funciones que es capaz de realizar 
este programa se manejan con una sola 
mano, ya que todas las opciones posi- 
bles se pueden realizar con sólo pulsar 
una tecla. Estas son: 


P. Dibuja un punto en la posición ac- 
tual del cursor gráfico. 

O. Borra el punto sobre el que se en- 
cuentra el cursor gráfico (si lo hubiese). 

L. Traza una línea desde el último pun- 
to que se dibujó hasta la posición actual 
del cursor gráfico. Si el punto fuese un 
punto en el color del papel (borrar) la lí- 
nea será también del color del papel 
(borrará). 

X. Visualiza en pantalla las coordena- 
das actuales del cursor gráfico. 

M. Graba la pantalla en el disco. Des- 
pués de pulsar esta tecla, se le pregunta 
al usuario con qué nombre se va a gra- 
bar. Si el nombre no tiene extensión BIN 
por ejemplo) el ordenador asignará dau- 
tomáticamente la extensión .BAS. 

N. Carga una pantalla que se en- 
cuentre en disco. Después de pulsar esta 
tecla se le pregunta al usuario el nombre 
de la pantalla a cargar. 

K. Este comando graba la pantalla en 
la memoria. Es un comando muy útil, pues 
nos permite hacer copias de seguridad 
de la pantalla sin tener que hacerlas en 


PROGRAMAS 


el disco. Esto sirve para que, en el caso 
de borrar la pantalla por error, no perda- 
mos lo que hemos hecho. 

J. Recupera la pantalla que se alma- 
cenó en memoria con el comando K. 

ESCAPE. Anula la última acción reali- 
zada. Si hemos trazado una línea equivo- 
cadamente, pulsando la tecla ESCAPE la 
pantalla volverá a aparecer como esta- 
ba antes de trazar dicha línea. 

Z. Borra la pantalla. Antes de borrarla 
pide la confirmación del usuario. 

B. Borra un fichero del disco. También 
saca el directorio para que el usuario 
vea los ficheros que contiene el disco. 

D. Muestra el directorio. El programa 
pide la unidad de la cual se quiere co- 
nocer el directorio. 

R. Renombra un fichero. Antes de ha- 
cerlo saca el directorio de la unidad que 
se le especifique. 

S. Vañía la velocidad con la que se 
mueve el cursor gráfico. Dicha velocidad 
se puede regular entre 1 y 9. 

F. Colorea una zona cerrada, como 
un círculo, rellenándola de color. 

C. Cambia el color de la tinta. El co- 
lor se puede variar entre 0 y 3 en el modo 
de 320, y entre 0 y 1 en el modo de 640. 

W. Nos permite copiar una parte de la 
pantalla a otro lugar de la misma. Para 
ello hace falta poner el cursor gráfico en 
la esquina superior izquierda del trozo a 
copiar y pulsar la letra W. Después nos 
movemos a la esquina inferior derecha y 
volvemos a pulsar la letra W. Una vez he- 
cho esto, el cursor desaparecerá y noso- 
tros podremos mover la zona elegida por 
la pantalla con las teclas del cursor. Una 
vez que esté donde nosotros queremos, 
pulsamos ENTER y el cursor volverá a apa- 
recer. 


Las teclas que mueven el cursor gráfi- 
co son las que se encuentran en el tecla- 
do numérico que están en la parte dere- 
cha del teclado. Estas teclas son: 


— Movimiento hacia abajo. 
— Movimiento hacia arriba. 
— Movimiento hacia la Izquierda. 
— Movimiento hacia la derecha. 


Or Eb 00 M 


Si en cualquier momento de la ejecu- 
ción del programa queremos ver todos 
los comandos de que dispone el SUPER- 
GRAFICS, sólo tenemos que pulsar el in- 


terrogante (?) para que aparezcan en 
pantalla. 


Notas sobre el programa 4 


Para cargar las pantallas que realices, 
desde uno de tus programas, sólo tienes 
que poner las siguientes Instrucciones: 


DEF SEG=8HBB800:BLOAD “nombre" 


AID. DEL PROGRAMA SIPERTARIOS 
(0) ...... Finaliza sesion 


O nto 
ERE LU ) 


Memoria 
cion (DEL) 
la (CLS) 


vevraa Varia la veloción del cursor 
7:08 la color 4 tinta (COLOR) 
A Lo dio GO 
ves... LOPl 
estra esta pantalla 


(2,4,6,8) NMueven el cursor 
PULSA UNA TECLA 


ÉS Comandos del programa Supergráficos. 


Fichero de discos 


Este último programa, también para el 
SPECTRUM, nos permitirá tener almacena- 
da, de una forma cómoda y que no ocu- 
pa espacio, toda la información referen- 
te a nuestros libros. Con el programa po- 
dremos saber en cualquier momento 
quién escribió un cierto libro, qué edito- 
rial tiene en su catálogo un libro que nos 
interesa, en qué fecha lo compramos, 
etcétera. 


FICHERO DE LIBROS 


T$(100,50) 
AS (100,50) 
C+(100,50) 


0$ (100,50) 


PRINT  INVERSE 13 "========= 


STEREO osos Fl 


CHERO D E LIBROS  ============== 


40 PRINT AT 6,73 —INVERSE El 
"3 INVERSE 03" FICHA NUEVA. "5 AT 


8,7; INVERSE 13" 2 "3 INVERSE O 
¿" CARGAR FICHERO. “¿AT 10,73 INV 
ERSE 13" 3 "j INVERSE 03" SALVAR 
FICHERO. "AT 12,73 INVERSE 1;" 
4 "3 INVERSE 0;" LISTAR FICHEROS 
"¿AT 14,73 INVERSE 13" 5 "¿ INV 
ERSE 03" BUSCAR UNA FICHA. "3 AT 1 
6,7; INVERSE 1;" 6 "3 INVERSE O; 
" BORRAR EL FICHERO.” 

42 PRINT AT 21,1; INVERSE 1," 
OFCION = "y FLASH 17" "¿CHR$+ 8; 

50 LET K$=INKEYS 

60 IF K$<"1" OR K$>"6" THEN 6 
O TO 50 

65 PRINT  INVERSE 13k$p" "y OY 
ER 13AT 4+2x*VAL K$,77" 

": FOR I=1 TO 200: 

NEXT 1 

70 GO TO 1000*VAL Ks$ 
1000 CLS : PRINT  INVERSE 17" 

INTRODUCIR FICHA NUEVA " 
1001 PRINT  INVERSE 1;"========= 


1002 PRINT  INVERSE 13" FICH 
AS EN MEMORIA = “¡AT 2,25 
y NF-1 


1005 INPUT "TITULO: "3 LINE T*$(N 
F) 

1006 PRINT “** INVERSE 13" TITUL 
LO.ooooo..: "y INVERSE 03" "s5T*$( 
NF) 

1010 INPUT "AUTOR: "3 LINE A+(NF 
) 

1015 PRINT * INVERSE 13" AUTOR . 
denme 3 "3 INVERSE 03" "¡As$(NF 


3 

1020 INPUT "CLASIFICACION: "3 LI 

NE C$(NF) 

1025 PRINT * INVERSE 13" CLASIFI 

CACION.2 "y INVERSE 03" "¿C*$(NF) 

1030 INPUT "EDITORIAL: "j LINE O 

$ (NF) 

1040 FRINT ' INVERSE 13" EDITORI 

Al.....2 "y INVERSE 03" "¿O$(NF) 

1050 LET NF=NF+1 

1400 PRINT kOj INVERSE 1;" INTRO 

DUCIR OTRA FICHA S/N “3 

1410 LET Wé=INKEYS 

1420 IF W$="S" OR W$="s" THEN 6 

O TO 1000 

1430 IF W$<>"N" AND W$<>"n" THEN 
GO TO 1410 

1440 GO TO 30 

2000 GO SUB 2400 

2020 INPUT "CATALOGO ?(S/N)"z L1 

NE B* 

2030 1F B$="S" THEN CAT 1 

2040 60 SUB 2300 

2060 LOAD *"M";1¿N$+"A" DATA Así 

) 


2061 LOAD *"M";1¿N$+"T" DATA T*(C 


) 

2062 LOAD *"M"p1pN$+"C" DATA C$( 

) 

2063 REM LOAD *"M"¡13N$+*"D"” DAT 

A 0$() 

2065 60 SUB 4400 

2070 GO TO 30 

2100 GO SUB 2300 

2110 LOAD N$+"A" DATA A$() 

2111 LOAD N$+*"T" DATA T$() 

2112 LOAD N$+"C" DATA C$() 

2113 LOAD N$+"0D" DATA 0$() 

2115 60 SUB 4400 

2120 60 TO 30 

2300 INPUT "NOMBRE DEL FICHERO 7 

(MAX.9 C.)"j LINE Né 

2310 IF LEN N$>9 THEN (GO TO 204 

o 

2320 RETURN 

2400 INPUT "CASSETTE (0) O MICRO 
(My LINE B+ 

2410 IF Bs="C" THEN 60 TO VAL Kk 

$*1E3+100 


2420. 1F B$<>"M" THEN GO TO 2400 
2430 RETURN 

3000 GO SUB 2400 

3010 GO SUB 2300 

3020 SAVE *"M"z13N$+"A" DATA AF( 


3021 VERIFY *"M"z1¿N$+"A" DATA A 
3022 SAVE *"M"¿13N5+"T" DATA Té( 
3023 VERIFY *"M"z13N$+"T" DATA T 
3024 SAVE *"M"z1¿N$+"C" DATA C$( 
3025 VERIFY *'MUp13N$+"C" DATA C 


3026 REM SAVE *"M"z1¿N$+"0" DAT 

A 0$() 

3027 REM VERIFY *"M"1¿N$+"0" D 

ATA 0$() 

3030 GO TO 30 

3100 GO SUB 2300 

3110 SAVE Ng$+"A” DATA A4() 

3111 SAVE N$S+"T" DATA T£() 

3112 SAVE N$+"C" DATA C+() 

3120 60 TO 30 

4000 CLS 1 PRINT  INVERSE 11 "=== 

qAAAEA e to 
LISTAR FICHERO === 


LASA ARA 


4001 PRINT- ****IMPRIMIMOS DESDE 
LA FICHA "32 INFUT "NO. DE FICHA 
"Ni 


4002 PRINT Ni 

4003 PRINT *'“"HASTA LA FICHA "y: 
INPUT "NO DE FICHA "¿N2 

4004 PRINT N2 

4005 IF (Ni<1 OR N1>NF-1) OR (N 

2<N1 OR N2>NF-1) THEN GO TO 40 

00 

4006 PRINT h0z INVERSE 1;" PULSA 
UNA TECLA "; 

4009 FOR N=Ni TO N2 

4010 LET B$=A+$(N) 

4020 GO SUB 4300 

4030 LET D$=B$ 

4040 LET B$=T$(N) 

4050 60 SUB 4300 

4060 LET Es=B+ 

4070 LET BS$=0$(N) 

4080 GO SUB 4300 

4090 LET F$=B5 

4091 LET B$=0$(N) 

4092 GO SUB 4300 

4093 LET G$=B$ 

4096 CLS 

4100 PRINT AT 0,03" -FICHA "¿Nj" 

4110 PRINT AT 9,03 INVERSE 1;"TI 

TULO 3 "; INVERSE 03" "3ES 

4120 PRINT AT 12,03 INVERSE 13"A 

UTOR : "j INVERSE 0," "¿DS 

4130 PRINT AT 15,03 INVERSE 1;"C 

LASIFICACION + "¿ INVERSE 03" "3 

FS 

4132 PRINT AT 18,0; INVERSE 1;"E 

DITORIAL "3 INVERSE 0," "30$ 

4140 PRINT RO; FLASH 13 "PULSA UN 

A TECLA. Q PARA IMPRIMIR"; FLASH 
o 

4145 PAUSE 01 IF INKEYS$="0" THEN 
corY 

4150 NEXT N 

4160 PAUSE O 

4170 GO TO 30 

4300 FOR A=1 TO LEN B$+1 

4310 IF B$(8)<>" " OR BS$(A+1)<>" 
" OR BS$(A+2)<>" " OR BS(A+3)<>" 
" THEN NEXT A 

4320 LET Es$=B$(1 TO A-1) 

4330 RETURN 

4400 FOR A=1 TO 100 

4410 IF A$(A,1)=" " THEN LET NF 

=A: RETURN 


PROGRAMAS 


4420 NEXT A 
4430 RETURN 
5000 INPUT "TITULO QUE BUSCAS ?" 
3 LINE Gg 
FOR B=1 TO NF-1 
LET B$=T*$(B) 
GD SUE 4300 
LET Ni=B: LET N2=B: GO TO 4 


NEXT E 

CLs 

PRINT "TITULO NO PRESENTE E 
FICHERO" 

PAUSE O 

60 TO 30 

INPUT "NUMERO DE FICHA ?2";,F 


IF F3NF THEN CLS : PRINT A 
+03 "NO HAY TANTAS FICHAS." P 

O: G0 TO 30 

FOR A=F TO NF+1 

LET A$(A)=A+$(4+1) 

LET TS$(A)=T+$(A+1) 

LET C$(A)=C$(4+1) 

NEXT A 

LET NF=NF 

GO TO 30 


El número de fichas que puede acep- 
tar el programa es de 150. Si tenemos 
más libros no hay ningún problema. Los 
podemos agrupar por temas y crearnos 
un fichero distinto por cada tema. 

Este programa aparecerá en las versio- 
nes para los distintos ordenadores en to- 
mos sucesivos. 


FICHA NUEUA. 
CARGAR FICHERO. 
SALVAR FICHERO. 


LISTAR FICHEROS. 
GUSCAR UNA FICHA. 
BORRAR EL FICHERO. 


LA Menú del progama «Ficheros de libros». 


AAA El o avijote 


MARA Cervantes 


LA, 


Ejemplo de ficha. 


Ecualizador 


Este programa es una pequeña curiosi- 
dad para los usuarios del SPECTRUM. Con 
él podrán ver en la pantalla del ordena- 
dor cómo es la onda sonora de la voz hu- 
mana, de un ruido, de un instrumento, de 
una canción, etc. 


ECUALIZADOR 


1 REM 4444 tttttt+++tt+ 
2 REM + ECUALIZADOR DE + 
3 REM + SONIDOS + 
Q REM 4er 
S REM + POR: Es 
6 REM + CARLOS CORAL + 
TO REM +4 A eee t+++ 
8 REM 
9 GO SUB 100 

10 LET K$=INKEY+$ 

11 PRINT AT 10,93 INVERSE 1,"P 
ULSA UNA TECLA" 

12 IF K$="" THEN GO TO 10 

13 CLS : LET DIR=23300 

14 LET X=0 

15 PLOT Xx,87 

15 PLOT X+1,87 

17 LET Y=PEEK DIR 

18 IF Y>175 THEN LET Y=175 

19 PLOT X+1,87 

20 PLOT Xx,87 

21 LET A=Y-87 

22 LET B=87-Y 

23 DRAW 2,5 

24 DRAW 2,B 

25 LET L=USR 64000 

26 LET X=X+4 


27 1F X>=252 THEN CLS 2 LET X 
=0 

28 60 TO 17 

100 FOR F=44000 TO 64040 

101- READ A 


oa URANO AGA 


110 DATA 175,50,4,91,6,8,62,117 Ph il " il n Mi uo ñ 10 m IA) 
sv ct ati , 3 Ú | 


111 DATA 219,254,203,119,204,21 
250,196 

112 DATA 31,250,16,242,201,58,4 
,91,203,135 

113 DATA 23,50,4,91,201,58,4,91 
¿203,199 

114 DATA 23,50,4,91,201 


Lo único que tienes que hacer para 
que este programa funcione es, aparte 
de teclearlo y hacer RUN, meter una cin- 
ta grabada en el cassette que utilizas 
para leer y grabar programas y pulsar la 
tecla PLAY. En cuando comience a sonar 
la cinta veremos en la pantalla la onda 
de dicho sonido. 


D Notas al programa 6 


Para que el programa entienda bien la 
música, o lo que esté grabando en la cin- 
ta, no es necesario poner muy alto el vo- 
Onda que realiza el programa y 
lA oleo" cuando cha en lumen. Es conveniente que éste se en- 
Rock and Roll. cuentre en la mitad de su recorrido. 


AS tablas de decisión 
constituyen un proce- 
dimiento simple y cla- 
ro de presentar las 
condiciones de pro- 
ceso en el tratamien- 
to de datos. Es normal 
= que los diferentes 
procesos elementales puedan ser defini- 
dos individualmente, así como las condi- 
ciones bajo las que dichos procesos de- 
ben aplicarse. Una tabla de decisión es 
una matriz en la cual se intercalan estas 
condiciones que han de cumplirse para 
que se apliquen unos tratamientos dados 
y los tratamientos que han de aplicarse 
en cada caso. 
En una tabla de decisión aparecen 
cuatro partes claramente diferenciadas: 


SITUACIONES 


SECUENCIAS 
DE 
TRATAMIENTOS 


TECNICAS 
DE ANALISIS 


TABLAS DE DECISION 


1) Matriz de condiciones. 

En ella aparecen todas y cada una de 
las condiciones que intervienen en el 
proceso estudiado, al cual se refiere la 
tabla de decisión. 

Es importante que estas condiciones 
estén perfectamente definidas y sean in- 
dependientes una de otras (es decir, se 
puedan identificar sin interrelación con 
las restantes): la tabla de decisión, pre- 
cisamente, establecerá la relación de 
unas con otras y con los tratamientos a 
aplicar en cada caso. 


2) Matriz de tratamientos. 

Aparecen en esta sección de la tabla 
de decisión todos los diversos tratamien- 
tos que habrá que aplicar en las diferen- 
tes situaciones del proceso que se estu- 
dia. 

Cada uno de estos tratamientos repre- 
sentará un pequeño módulo de proceso 
dentro del pograma general en que se 
plasmará la tabla de decisión. 


3) Situaciones. 


Conjunto de posibles combinaciones 
de las condiciones descritas en la matriz 
de la izquierda de la tabla de decisión. 

En esta parte de la tabla se van ano- 
tando, por columnas, las condiciones 
que deben darse en cada una de las po- 
sibles situaciones. 


4) Secuencias de tratamientos. 

Combinaciones de los distintos trata- 
mientos a aplicar en función de las situa- 
ciones diferentes que aparecen en la 
parte tercera de la tabla. 

Para cada situación se reseña, en la 


misma columna, el conjunto de los trata- 
mientos a aplicar a los datos en esa situa- 
ción. 


Situaciones 


Condición 1 
Condición 2 
Condic. 3 
caso A 
Condic. 3 
caso B 
Condilc. 3 
caso € 
Condición 4 


Z 000 Z 0 nv 


Condición m 


Tratamiento 1 
Tratamiento 2 
Tratamiento 3 
(ir a tabla B) 


9 IIA OZ NA ZN 
XXX|Z Zo € v. mu 
X X|]Z vo mn nn Zu 


Tratamiento m 


| 
lA Un ejemplo de tabla de decisión. 


De acuerdo con lo anterior, se puede 
ver en la figura 2 un ejemplo de tabla de 
decisión: la primera situación se produci- 
rá cuando Sl se cumple la condición 1, 
pero NO la 2; de la condición 3, SI se 
cumple el caso A pero NO los casos B y 
T, etc. La prolongación hacia abajo de 
sa columna (correspondiente a la situa- 
ción 1.%) nos indica que en este caso se 
debe aplicar el tratamiento 1 y el trata- 
miento 3 (que conduce, a su vez, a otros 
procesos o tratamientos descritos en otra 
tabla de decisión: la tabla B). Del mismo 
modo, la situación segunda (caso en que 
SI se cumplen las condiciones 3-caso A, 
4.... m; y no se cumplen las restantes con- 
diciones) exige que se apliquen los tra- 
tamientos 1, 2,... m 

Existen tablas de tipo «ampliado»: 
cuando las condiciones presentan más 
de dos alternativas o conjunto de valo- 
res. En contraposición a ellas, cuando en 
una tabla de decisión todas las condicio- 
nes son simples, la tabla se suele llamar 
«limitada». La tabla presentada en la fl- 
gura 2 es del tipo «mixto», pues aparecen 
en ella condiciones simples y una condi- 
ción (la tercera) con varias alternativas. 
A veces, las tablas de decisión amplia- 
das o mixtas presentan en una sola con- 
dición las diferentes opciones que se 
pueden dar; en ese caso se pueden con- 


vertir (como se ha hecho en la tabla de 
la figura 2) a tablas con condiciones sim- 
ples desglosando en varias la condición 
múltiple. 

Por otro lado, se suelen distinguir tam- 
bién, en las tablas de decisión, aquéllas 
que son completas en sí mismas (tablas 
«Cerradas») de las que (como el ejemplo 
presentado) remiten, en algunos de los 
tratamientos propuestos, a la consulta de 
otra u otras tablas adicionales: estas ta- 
blas se suelen llamar «abiertas» o «re- 
currentes». 

Otro aspecto a tener en cuenta es el 
tipo de reglas de decisión que se Inclu- 
ye en la tabla. Pueden ser de tipo AND, 
OR, ELSE o múltiples. La regla AND signifi- 
ca que han de darse todas las condiclo- 
nes indicadas en la columna correspon- 
diente de la matriz de situaciones, para 
que se ejecuten los tratamientos marca- 
dos en la parte inferior de la columna: 
como se está afirmando que ha de cum- 
plirse la condición «i» Y la condición «j» 
Y la condición «K» Y... se designa este 
tipo de regla con el nombre inglés del 
operador lógico correspondiente (AND). 

En el ejemplo propuesto en la figura 2 
hemos considerado que las reglas de de- 
cisión (columnas de la matriz de situacio- 
nes) son de tipo AND. 

En las reglas de tipo OR se supone que 
se produce la situación descrita en la 
correspondiente columna (y que se de- 
ben aplicar, en consecuencia, los trata- 
mientos indicados) si se cumple la con- 
dición «l» O la condición «j» O la condi- 
ción «k» O etc.: es decir, se «disparará» 
la correspondiente regla si se cumplen 
una o más de las condiciones marcadas. 

La regla de tipo ELSE se llama así en re- 
lación con la instrucción (común a varios 
lenguajes de programación) IF... ELSE.. 
(SI... EN-OTRO-CASO...; SI sucede una con- 
dición, hacer esto; EN- OTRO-CASO hacer 
tal otra cosa); aparece este tipo de re- 
gla de decisión cuando sólo algunas de 
las posibles situaciones nos conducen a 
tratamientos especializados, mientras 
que todo el resto de las situaciones pro- 
ducen un tratamiento concreto (único 
para todas las restantes); en este caso, 
se detallan las situaciones que condu- 
cen a tratamientos específicos y el resto 
de las posibilidades se agrupan en una 
única regla de decisión (que se llama re- 
gla ELSE). 


RADICIONALMENTE se 
ha considerado que 
un programa de or- 
denador bien cons- 
truido debe constar 
de dos partes clara- 
mente diferenciadas: 
por un lado, las ins- 
trucciones de que consta el programa; 
por otro, los datos sobre los que éstas ac- 
túan. A su vez, las instrucciones se divi- 
den en cuatro grupos principales: 


. Asignación a una variable del valor 
de una expresión. 

e Estructuras de control, que permiten 
dirigir la ejecución del programa por los 
pasos necesarios para realizar la tarea 
propuesta. 

e Instucciones de modularización, 
que descomponen un programa com:- 
plejo en partes más pequeñas, cerradas 
en sí mismas y más fácilmente compren- 
sibles, lo que facilita la construcción, 
mantenimiento y legibilidad de los pro- 
gramas obtenidos. 

e Instrucciones de acceso a los dis- 
positivos periféricos (entrada/salida), 
que permiten que nuestro programa pue- 
da utilizar adecuadamente la pantalla, 
los ficheros en disco, la impresora, los 
gráficos y muchos otros dispositivos. 


Pero un pograma sin datos no serviría 
para nada. Porque, en definitiva, ¿qué es 
un programa, sino un medio que, a partir 
de clertos datos iniciales, nos permite 
calcular ciertos resultados que deseába- 
mos conocer? Esta definición se aplica 


TECNICAS 
DE PROGRAMACION 


ESTRUCTURAS DE DATOS 


incluso a programas que aparentemente 
no calculan ningún dato concreto. Como 
ejemplo, pensemos en el control por or- 
denador de una máquina que ha de rea- 
lizar un trabajo determinado: la fabrica- 
ción de un tornillo o el ensamblaje de 
dos piezas en una cadena de montaje. 
Ante la mirada del observador casual, el 
programa que controla la máquina no 
parece estar calculando resultados de 
ningún tipo, pues se limita a regular la ac- 
ción de la máquina y a dirigir sus meca- 
nismos. Sin embargo, en realidad existe 
un considerable flujo de información, de 
datos, que van introduciéndose en la 
máquina por diversos medios y convir- 
tiéndose en otros a través de cálculos 
más o menos complejos. Antes de poder 
mover el brazo de un robot que debe co- 
locar cierta pieza en el lugar deseado, el 
programa debe poseer información so- 
bre la posición actual de la pieza, el lu- 
gar exacto a donde debe llevarla y la lo- 
calización de las distintas partes del bra- 
zo mecánico. Estos datos, que puede 
conseguir por medio de sensores visua- 
les o táctiles, serán elaborados para ob- 
tener otros, que definen con todo deta- 
lle cada uno de los movimientos elemen- 
tales que habrán de realizarse. Los resul- 
tados del cálculo son, también en este 
caso, datos, aunque no podamos verlos 
explícitos sobre el papel de una impre- 
sora. 

Veamos un ejemplo. En el capítulo pri- 
mero vimos un algoritmo que nos permi- 
tía convertir a la base 2 un número ente- 
ro cualquiera expresado en la base diez. 


Repltamos aquí el algoritmo, en forma de 
organigrama: 


Calcular 
cociente € 
_ yrestoR (1) 


Ahora vamos a ver cómo se construiría 
un programa que realice este algoritmo 
en el lenguaje BASIC. 


DIM R(10) 

FOR I=1 TO 10: LET R(1)=0: NEXT 1 
PRINT "dame un número entre 

O y 1000" 


INPUT X 

FOR I=i TO 10 
LET C=INT (X/2) 
LET R(1)=X-2KC 


80 IF C=0 THEN 
90 LET X=C 
100 NEXT 1 
110 FOR I=i TO 10: PRINT R(11-1)3: 


GOTO 110 


Comparando el programa con el orga- 
nigrama, podemos descubrir la siguiente 
correspondencia entre los bloques y las 
instrucciones: 


En cuanto a las líneas 10 y 20 del progra- 
ma, definen la variable R, donde se guar- 
dará la sucesión de restos (es decir, las 
cifras en base 2) y asignan un valor ini- 
cial de cero a cada uno de los diez luga- 
res que tiene previstos para las cifras del 
resultado. 

Obsérvese también que, en la instruc- 
ción 110, los valores de los restos se im- 
primen en orden inverso, como es preci- 
so hacer para que las cifras del número 
convertido a la base 2 aparezcan en el 
orden correcto. 

Siempre es difícil, en los programas es- 
critos en BASIC, distinguir claramente en- 
tre las instrucciones y los datos, pues este 
lenguaje es muy poco estructurado. En 
particular, la regla que permite utilizar 
una variable sin haberla definido previa- 
mente facilita que los datos queden es- 
parcidos a lo largo y a lo ancho de los 
programas y mezclados íntimamente 
con las instrucciones ejecutables. 


e TECNICAS DE PROGRAMACIÓN 


En el caso del programa l, los datos 
son los sigulentes: 


* La variable X, donde se guarda ini- 
cialmente el valor en base 10 que se de- 
sea convertir a la base 2, aunque a lo lar- 
go del programa este valor va siendo sus- 
tituido por los cocientes sucesivos, de 
acuerdo con el algoritmo. 


e La varible C, donde se guarda el va- 
lor del cociente entero de X al dividirlo 
entre 2. 


* La variable R, que no es como las an- 
teriores, que tienen un solo valor, sino 
que puede considerarse como un agre- 
gado de diez valores diferentes, donde 
van a guardarse los restos sucesivos que 
vayamos obteniendo. Esto se debe a que 
no debemos perder estos restos, puesto 
que entre todos constituyen el resultado 
del programa. Podemos representar los 
diez valores distintos de la variable R con 
los símbolos R(1), R(2), R(3), R(4), R(5), 
R(6), R(7), R(8), R(9) y R(10). 


e La variable |, que actúa como conta- 
dor de los tres bucles de que consta el 
programa. Sólo uno de estos bucles (el 
central) aparece en el organigrama. Los 
otros dos, el de inicialización de los diez 
valores de R (instrucción 20) y el de es- 
critura de los mismos (instrucción 110), 
están implícitos. 


Puede verse que sólo la variable R está 
claramente separada de la parte ejecu- 
table del programa. Esto se debe a que, 
tratándose de una variable especial (un 
agregado de datos), debe definírsela ex- 
plicitamente como tal. La instrucción 10 
tiene por objeto, precisamente, comuni- 
carle este hecho al intérprete de BASIC, 
es decir, pedirle que le dé un tratamien- 
to diferente al de las restantes variables 
DIMR(10) significa, pues, que Res una va- 
riable de «dimensión» 10, es decir, un 
agregado de diez valores. 


El lenguaje BASIC permite colocar las 
instrucciones DIM en cualquier parte del 
programa, siempre que sea antes de la 
primera utilización de las variables 
correspondientes. Sin embargo, no es 
una buena técnica de programacion 
aprovecharse de esto para distribuir ale- 
gremente las instrucciones DIM por diver- 


sos lugares de nuestros programas, pues 
esto tiende a hacerlos menos legibles, lo 
que dificulta su comprensión posterior 
por otras personas, o incluso por nosotros 
mismos. Lo recomendable es colocar to- 
das las Instrucciones DIM al principio del 
programa, de manera que sea muy fácil 
ver, de una sola ojeada, cuáles son las 
variables que actúan como agregados 
de datos. Tan sólo existe una excepción 
a esta regla de buen programar, que se 
verá cuando hablemos de la modulariza- 
ción de los programas. 


Las Instrucciones del tipo de la línea 
10, que no realizan ejecución alguna, 
sino que sólo siven para definir la estruc- 
tura de ciertos datos que van a ser ulili- 
zados posteriormente por un programa, 
se llaman «instrucciones declarativas». 


Las variables que podríamos llamar 
«normales» (que tienen un solo valor), 
como |, X y C en el ejemplo anterior, no 
es preciso definirlas, por lo que aparece- 
ran por primera vez en nuestros progra- 
mas BASIC cuando tengamos que hacer 
uso de ellas, y no antes. En este caso con- 
creto es fácil localizarlas, pues el progra- 
ma es corto. Así vemos que l aparece por 
primera vez en la línea 20, X en la 40 y C 
en la 60. Pero es fácil comprender que, 
si el programa BASIC es largo y comple- 
jo, será mucho más difícil separar los da- 
tos de las instrucciones. 


Si el programa anterlor hublera sido es- 
crlto en lenguaje PASCAL, no sería tan di- 
fícil distinguir las dos partes principales 
de todo programa: datos e instrucciones. 
En efecto: en PASCAL, todo programa 
debe comenzar por un conjunto de ins- 
trucciones declarativas, donde deben 
definirse todas y cada una de las varia- 
bles que van a tomar parte en el progra- 
ma, y que deben estar situadas al princi- 
plo, antes de las instrucciones ejecuta- 
bles. Esta es una de las razones por las 
que PASCAL se considera un lenguaje 
mucho más estructurado que BASIC, aun- 
que hay otras, que iremos viendo poste- 
riormente. 


Veamos cómo se escribiría el mismo 
programa (a partir del mismo organigra- 
ma) en el lenguaje PASCAL. 


Se puede ver cómo al principio de este 
programa aparecen, encabezadas por 


var 
X» iz integer; 
r: array[1..10] of integer; 


begin 
witeln(”*Dame un número entre O y 
1000”); readln(x)3 
for iz=1 to 10 do 
begin 
rlili= x mod 2; 
x3ex div 2; 
end; 
for iz=1 to 10 do write(rC11-11); 


la palabra reservada «var», las declara- 
ciones de todas las variables que utiliza: 
x, donde se guarda el número decimal 
entero que vamos a convertir a la base 
2; 1, que sirve como contador; y r, que es 
un agregado de diez valores, donde ire- 
mos colocando los restos sucesivos. En 
este caso no hemos inicializado los res- 
tos a cero, nitampoco hemos abandona- 
do el cálculo tan pronto se obtuvo el co- 
ciente cero, sino que continuamos calcu- 
lando restos hasta que el contador del 
bucle (la variable |) alcanza el valor 10. 
Sn embargo, el resultado es totalmente 
equivalente al del programa anterior, 
pues todos los restos adicionales que ob- 
tendremos serán siempre iguales a cero. 
Debido a estas pequeñas modificacio- 
nes, el organigrama correspondiente a 
este programa no es exactamente igual 
al de la figura 1, sino que corresponde al 
de la figura 2. 


Por último, puede ocurrir, como en el 
caso de un lenguaje de quinta genera- 
ción como el APL, que la potencia del 
lenguaje sea tan grande que un organl- 
grama relativamente detallado como el 
anterior resulte innecesario, pues es po- 
sible resolver el problema de la conver- 
sión de números de la base 10 a la base 
2 en una sola instrucción ejecutable. En 
este caso, tampoco será necesario se- 
parar las instrucciones de los datos, pues 
el programa es tan reducido que la se- 
paración es obvia, y no precisa estructu- 
ración alguna. Veamos, por consiguien- 
te, en el programa 3, cuál es esa instruc- 


ción APL que resuelve el problema de la 
conversión numérica, junto con un par de 
ejemplos de su utilización: 


(10p2)10 


127 
UAT SA 


c1oOpz)TO 


23 
0000010111 


ñ TECNICAS DE PROGRAMACIÓN 


En este programa no existe ningún 
nombre de variable, pues no es necesa- 
rio. El número decimal que deseamos 
convertir a la base 2 se introduce direc- 
tamente desde el teclado (el símbolo 
cuadrado, en APL, significa que quere- 
mos obtener datos del teclado, y equiva- 
le hasta cierto punto a la instrucción IN- 
PUT de BASIC) y se convierte a la base de- 
seada en una sola operación, represen- 
tada por el símbolo semejante a una T 
pequeña. En cuanto a los datos incluidos 
entre paréntesis a la izquierda de este 
símbolo, el 2 indica la base de numera- 
clón a la que se desea convertir y el 10 
es el número de cifras que deseamos ob- 
tener del número binaria resultante. 

Como es lógico, el organigrama co- 


rreespondiente a este programa no es 
tampoco el de la figura 1, sino mucho 
más sencillo. Veámoslo en la figura 3. 

Para terminar, hay que añadir que 
cualquiera de los programas anteriores 
puede transformarse fácilmente en otro 
que realice la conversión de la base 10 
a otra base calquiera distinta de la base 
2. Para ello, en el caso de la versión BA- 
SIC, bastará cambiar el 2 que aparece 
en las líneas 60 y 70 por la base de que 
se trate. Lo mismo ocurre con el progra- 
ma PASCAL, donde también aparece la 
base 2 dos veces, en dos instrucciones 
consecutivas. En el caso del programa 
APL, también hay que sustituir el 2 inclui- 
do entre paréntesis por la base de nume- 
ración deseada. 


PASCAL 


EAMOS el siguiente 
programa. 


program Calculador; 


begin 
writein (“El número “,5, 
“al cuadrado vale 55); 
writein (“El número *,5, |. 
“al cubo vale ',5"5"5) 
end. 


Como veremos más adelante con ma- 
yor detalle, la instrucción «writeln» sirve 
para sacar por pantalla las frases, núme- 
ros y resultados de operaciones matemá- 
ticas que aparecen entre paréntesis justo 
detrás de ella. Por tanto, en la pantalla 
aparecerá algo así: 


El número 5 al cuadrado val 
1] 
A 


25 
Pa va 
El número 5 al cuadrado va 12 


E 
e 


Si ahora quisiéramos cambiar el pro- 
grama para que hiciese los cálculos con, 
por ejemplo, 6 en lugar de 5, tendríamos 
que sustituir todos los cincos que apare- 


DEFINICION DE DATOS EN UN 
PROGRAMA PASCAL 


cen en el programa por seises. Si el pro- 
grama fuese largo, esto podría llegar a 
ser muy tedioso. 


í 2 
lu Constantes numéricas 


En PASCAL es posible asociar hombres 
(identificadores) a los números que van 
a ser constantes a lo largo del programa. 
Este nombre será luego el que se emplee 
en lugar del número. La asociación se 
hace en la zona de descripción de datos 
(es decir, tras la cabecera del progra- 
ma); silo empleamos en el programa an- 
terior: 


program Calculador; 


const Nu = 5; 


begin 
writeln (“El número “,5, 
“tal cuadrado vale “Nu"Nu); 
writeln (“El número “,5, 
“al cubo vale “,Nu*Nu*Nu) 
end. 


E PASCAL 


Este programa es totalmente equiva- 
lente al primero, pero hemos utilizado lo 
que se denomina «declaración de cons- 
tantes». 

Gracias a esto, cada vez que aparez- 
cala palábra Nu en alguna parte del pro- 
grama, será como si realmente hubiése- 
mos puesto un cinco. 

Si ahora quisiéramos que el programa 
funcionase con un seis, bastaría con re- 
tocar el sitio donde hemos dicho que Nu 
equivale a 5, es decir, pondríamos: 


const Nu = 6; 


La declaración de constantes siempre 
va precedida por la palabra reservada 
CONST y sirve para indicar al compilador 
que todo lo que venga a continuación, 
hasta que aparezca otra palabra reser- 
vada (que en este caso es BEGIN), son de- 
finiciones de constantes. Tras CONST se 
escribe el nombre a utilizar, un signo 
igual y el valor que queremos asociar al 
nombre. Al final de la zona de declara- 
ción de constantes siempre va un punto 
y coma (que, como iremos viendo, es lo 
que se utiliza más a menudo para sepa- 
rar cosas en PASCAL). 

Podemos declarar todas las constantes 
que queramos sin más que poner sus de- 
finiciones una detrás de otra separadas 
entre sí por punto y coma: 


const Juan = =45; Luls = 4234; 
Ene = -347; 


Quedaría más claro así: 


const 
Juan = =45; 
Luls = 1234; 
Ene = -347; 


De esta forma, cada vez que en el pro- 
grama aparezca Juan será como si hu- 
biésemos puesto -15, y análogamente 
con los otros. 


Textos 


En el programa hay también textos o 
frases. En PASCAL las frases se escriben 
siempre entre apóstrofos como en «El nú- 
mero» o «al cubo vale». Dentro de una fra- 
se pueden ponerse letras, cifras, símbo- 


los, espacios en blanco, etc., con total f- 
bertad; el compilador la toma tal como 
es, sin Intentar analizar lo que contiene: 


“Pone const y no pasa nada' 


Para que aparezca un apóstrofe en 
medio de una frase sin que el compila- 
dor se crea que es el que marca el final. 
se pone por duplicado: 


“Esta frase tiene un ' en medio' 


Para que aparezca un apóstrofo en 
talla sólo aparecerá un apóstrofo. 

Al igual que con los números constan- 
tes, podemos asociar un identificador a 
una frase. Es simplemente otro tipo de 
constante y por ello se declara de mane- 
ra análoga: 


program Calculador; 


cost 
Nu = 5; 
Fr = “El número ”; 


begin 
writeln (Fr,Nu, 


*al cuadrado vale”, Nu"Nu); 
writeln (Fr,Nu, 
“al cubo vale”, Nu*"Nu*NuNu) 


Así, cada vez que aparece Fr es como si 
hubiésemos puesto realmente la frase. 

Las frases son distintas de los números. 
Estos se guardan en la memoria del orde- 
nador usando unos códigos especiales 
para ello. Sin embargo, si declaramos la 
constante C = '-54', ésta se guarda con 
un código para el signo menos, otro para 
la cifra 5 y otro para la cifra 4. C no se 
puede emplear para cálculos matemáti- 
cos; es sólo una frase que casualmente 
tiene aspecto de número. 


O Variables 


Si los programas sólo pudieran trabajar 
con datos que son siempre los mismos, 


servirían para bastante poco. En PASCAL, 
como es lógico, se pueden tener datos 
variables, pero hay que declararlos al 
principio del programa. 

Los datos variables se guardan en por- 
ciones de la memoria del ordenador, 
siendo estas porciones de mayor o me- 
nor tamaño según el tipo de dato que 
tengan que alojar. 

La declaración de variables sirve fun- 
damentalmente para que: 


1. El compilador reserve las porciones 
de memoria necesarias y del tamaño 
adecuado. 

2. Asociar a cada porción un nombre 
para así poder utilizar el dato que guar- 
de llamándole por ese nombre. 


La zona de declaración de variables se 
encuentra justo tras la de las constantes 
(caso de existir ésta) y antes de la zona 
de instrucciones. Por tanto, la estructura 
de un programa queda de la siguiente 
manera: 


program NombreDelPrograma; 


Declaración de 
constantes 


Declaración de 
variables 


El comienzo de la zona de definición 
de variables se indica con la palabra re- 
servada VAR, tras la que se escriben todas 
las definiciones que se necesiten separa- 
das entre sí por punto y coma. Cada de- 
finición consta del nombre de la variable 
seguido de dos puntos y de la descrip- 


ción del tipo de variable a que corres- 
ponde. Veamos un ejemplo: 


var 
Edad : integer; 
Peso : integer; 
Inlelal : char; 


Cuando dos o más variables son del mis- 
mo tipo, se puede Indicar de manera re- 
sumida poniendo sus nombres uno a con- 
tinuación de otro y separados por co- 
mas: 


var 
Edad, Peso : integer; 
Inicial : char; 


INTEGER y CHAR son dos tipos de datos 
predefinidos que sirven, respectivamen- 
te, para guardar números enteros y ca- 
racteres (es decir, textos de un solo ca- 
rácter). 

Por tanto, estaríamos indicando al 

compilador que queremos tener dos va- 
riables de nombre «Edad» y «Peso» para 
guardar números enteros y otra de nom- 
bre «Inicial» para guardar caracteres. 

En PASCAL existen muchos tipos de da- 
tos además de INTEGER y CHAR, e incluso 
es posible inventar nuevos tipos. Una re- 
gla de oro del PASCAL es la siguiente: 


Nuñca se pueden mezclar entre si 
tipos distintos de datos 


El compilador, al traducir nuestro pro- 
grama, vigila que no intentemos guardar, 
por ejemplo, un número entero en una 
variable de tipo CHAR, y avisa en su caso 
de la presencia de un error. 


Otra posibilidad muy interesante es la 
de limitar los valores que pueda tomar 
una variable. Así, si intentáramos guardar 
un valor fuera de los límites establecidos, 
se produciría un error. Para hacer esto, 
en lugar del nombre del tipo se escriben 
el valor límite inferior y el superlor sepa- 
rados entre sí por un par de puntos: 


var 
Edad : 0..110; 
Peso :0..200; 
Inicial : *'A*..*Z”; 


De esta manera, Edad sólo podría 
guardar números entre 0 y 110 e Inicial 
sólo letras de la A a la Z. 


Por supuesto, podríamos utilizar cons- 
tantes declaradas previamente para de- 
finir los limites: 


)..EdadMaxima; 


esoMaximo; 


NOTA: No con todos los compiladores 
se produce siempre el control de límites; 
a menudo es opcional. Por otra parte, a 
veces se consigue una disminución de la 
cantidad de memoria necesaria para 
una variable al limitar sus valores. 


D Instrucciones de programa 


Una vez que tenemos declaradas las 
constantes y variables que vamos a utili- 
zar, hay que indicar qué es lo que que- 
remos hacer, y eso se consigue por me- 
dio de instrucciones que se escriben una 
detrás de otra, separadas entre sí por 
punto y coma, tras la zona de declara- 
ción de datos y entre las palabras reser- 
vadas BEGIN y END (con punto final, no lo 
olvidemos). 

Hay dos tipos básicos de instrucciones: 


— Las que hacen algo con los datos: 
leerlos de teclado, sacarlos por la pan- 
talla o impresora, generar nuevos datos 
a partir de otros, etc. 

— Las que sirven para regular cuáles, 
cuándo y cuántas veces ejecutar las Ins- 
trucciones del grupo anterior. 


Vamos a empezar por las instrucciones 
que sirven para mostrar datos. 


TT 
¡0 Instrucciones de salida 


Si quisiésemos mostrar por la pantalla 
el número -17, como internamente se 


guarda en la memoria usando un código 
especial, lo primero que tendríamos que 
hacer es deducir qué caracteres son los 
que hay que mostrar para que nosotros 
nos enteremos (un signo menos, un uno y 
un siete); a continuación habría que ma- 
nejar la parte del ordenador encargada 
del control de la pantalla para que los 
presentase. 

Afortunadamente, en PASCAL existen 
unos «procedimientos» o conjuntos de 
instrucciones ya preparados que hacen 
todo esto, de manera que no hay que 
preocuparse de esas cuestiones y basta 
con utilizar el nombre del procedimiento. 

Uno que ya conocemos es WRITELN. 
Para utilzarlo, se escribe su nombre segui- 
do de la lista de las diferentes cosas que 
queremos que aparezcan, separadas 
entre sí por comas; la lista debe ir entre 
paréntesis: 


program Escritor; 
const Ene = -17; 


begin 


writeln (Esto es una frase.”, 
Ene, */Esto es otra. *,2"Ene) 


end. 


Este programa sacará por la pantalla: 


] 


Esto es una trase, -17 / Esto es otra. 34 


En general, el tipo de cosas que se 
pueden mostrar son: 


— Constantes numéricas o textos: 
writeln (14, Avión") 


— Constantes declaradas: 
writeln (Ene) 


— El valor de una variable: 
writeln (Peso) 


— El resultado de cálculos matemáti- 
cos: writeln (2 * Ene) 
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HISTORIA 
DEL LENGUAJE C 


L lenguaje de progra- 
mación C fue de- 
sarrollado por Dennis 
Ritchie, de los Labo- 
ratorios Bell, en la dé- 
cada de los setenta, 
cuando trabajaba, 
junto con Ken Thomp- 
son, en el diseño del sistema operativo 
UNIX. 

El UNIX surgió por la necesidad de dis- 
poner de un sistema operativo potente 
que pudiese funcionar en pequeños or- 
denadores de propósito general. Esto dio 
lugar a que Ken Thompson desarrollara 
una primera versión de un pequeño siste- 
ma operativo, al que denominó UNIX, es- 
crito en lenguaje ensamblador, siendo 
revisado posteriormente esta primera 
versión en un nuevo lenguaje de progra- 
mación «lenguaje B», desarrollado a su 
vez por Ken Thompson. 

El lenguaje B fue ampliado por Dennis 
Ritchie, el cual obtuvo una nueva versión 
a la que llamó «lenguaje C». 

El momento actual del hardware, con 
el desarrollo de microordenadores de 
16 bits que poseen la misma potencia 
que los miniordenadores de hace unos 
años, ha favorecido el uso del sistema 
operativo UNIX y el lenguaje C. 

El lenguaje C se está transformando a 
pasos gigantescos en una de las bases 
de programación más importantes y po- 
pulares, 


NÁ 
"A 
tE==xY Cha adquirido una amplia difusión. 


'Ú Características 
= fundamentales de C 


El C es hoy día el lenguaje por excelen- 
cia de los miniordenadores que trabajan 
bajo el sistema operativo UNIX. 

Pero no solamente se trabaja con C en 
miniordenadores y grandes sistemas. Ac- 
tualmente se dispone en el mercado de 
compiladores del lenguaje C para orde- 
nadores personales. 


3 C puede utilizarse en ordenadores personales, 


C es un lenguaje de programación de 
propósito general que produce «progra- 
mas compactos» y «eficientes». 


(A, Los programas escritos en C ocupan menos es- 
pacio. 


El diseño de programas en C puede lle- 
varse a cabo bajo técnicas de programa- 
ción estructurada (diseño “topdown”) 
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¡ÉS C posee las estructuras básicas de la programa- 
ción estructurada. 


incorporando estructuras de control bá- 
sicas como DO, UNTIL, WHILE, SWITCH e IF- 
THEN-ELSE. Los aficionados a la programa- 
ción reconocerán este tipo de estructu- 
ras comunes, en gran medida, a otros 
lenguajes tales como el Pascal. 


C permite crear programas fáciles de 
modificar y de adaptar a nuevos ordena- 
dores. Su «portabilidad» le hace el len- 
guaje idóneo para que programas en C 
escritos en un sistema puedan ejecutar- 
se en otros con modificaciones mínimas. 


| 
A 
ÚS C es portátil. 


Hoy día existen compiladores C para 
unos 40 sistemas, abarcando desde mi- 
croprocesadores de 8 bits hasta el su- 
perrápido Cray1. 


Otra característica a resaltar del C es 
su «potencia» y «flexibilidad». El sistema 
operativo UNIX esta escrito, en su mayor 
parte, en lenguaje C. También existen 
cantidad de compiladores en el merca- 
do desarrollados bajo C , entre los que 
podríamos mencionar Pascal, Lisp, Logo, 
Basic, etc. 


' 0 A 
LJ 


' 
y 
$ 


[A C es flexible. 


(A, El sistema operativo UNIX está escrito en C. 


Para los estudiosos de los diferentes 
lenguajes de programación diremos que 
C posee ciertas estructuras afines al Pas- 
cal, la sencillez del Basic y en ciertos as- 
pectos llega a niveles tan bajos de la má- 
quina que podemos decir que estamos 
trabajando con ensamblador (¡casi 
nadal!). 

En resumen, las características princi- 
pales a destacar del lenguaje C son: 


— Producir programas reducidos (có- 
digo compacto). 

— Producir programas eficientes. 

— Ser un lenguaje portátil, potente y 
flexible. 


— Servir de base para el desarrollo de 
compiladores de otros lenguajes de pro- 
gramación. 

— Aprovechar las ventajas de la pro- 
gramación estructurada. 

— Ser de gran utilidad para estudian- 
tes y profesionales. 

— La instalación es económica. 

— Herramienta óptima para el diseño. 

— Utilización en áreas tan extensas 
como los paquetes software, la gestión, 
los minis y microordenadores y los jue- 
gos, entre otros. 


7 


14) 


Algunas características de C. 


C se uliliza para paquetes Sotfware y juegos. 


SE UTILIZA 
PARA 


Utilización de C. 


'O La escritura de programas 
en C y su compilación 


Los lenguajes de programación, en ge- 
neral, están basados en lenguajes “intér- 
pretes” y lenguajes “compilados”. Entre 
los primeros podemos citar el LOGO y el 
BASIC, perteneciendo al segundo grupo 
de los llamados compilados lenguajes 
tales como el FORTRAN, PASCAL y C. 

La primera fase para escribir un progra- 
ma en C es disponer de un editor de pro- 
pósito general, ya que el C no dispone 
de uno propio, para empezar a escribir 
su programa. Su ordenador dispondrá de 
un editor para realizar esta tarea. Si pre- 
fiere utilizar un editor distinto del que dis- 
pone su sistema, puede recurrir a proce- 
sadores de texto tan conocidos como el 
Wordstar utilizando la opción N (opción 
de “no documento”). Una vez escrito su 
programa, debe darle un nombre recor- 
dando que debe terminar con e, como, 
por ejemplo: 


prog.c 
hola.c 


En un sistema UNIX el editor podría ser 
Invocado tecleando ed, ex, edit, emacs, 
o vi. Los ordenadores personales dispo- 


¡ Al 


44. HISTORIA DEL LENGUAJE C 


nen de editores tales como edlin, ed, 
Wolkswriter, etc. 

Una vez escrito su programa, éste debe 
compilarse por medio del compilador de 
C, cuya misión es detectar si su progra- 
ma posee algún error y, en caso de no 
existir ninguno, traducirlo al lenguaje que 
entiende la máquina, es decir, el código 
objeto. La traducción de su programa lo 
colocará en un nuevo fichero. Bastará in- 
vocar el nombre de este último fichero 
para que nuestro programa se ejecute. 

Veamos un ejemplo: 


% include <stdio.h> 
main ( >) 


printf (“Este es mi primer programa en 
Am); 


Este texto que hemos tecleado, gracias 
al editor, se guardaría en un fichero y se 
compilariía dando como resultado un fi- 
chero que al ser invocado ejecutaría 
nuestro programa. 

En el sistema UNIX, el compilador de C 
se denomina ce, por lo que para compl- 
lar nuestro programa bastaría teclear: 


rograma 


Terminada la compilación observaría- 
mos que se ha creado un nuevo fichero 
llamado a.out. Tecleando dicho nombre 
nuestro programa se ejecutaría apare- 
ciendo en pantalla el siguiente texto: 


Este es mi primer programa en C. ¡Era 
de esperar! 


Para ordenadores personales existe 
una versión de compilador de C llamada 
Laticce C. Los pasos que daremos para 
ejecutar nuestro programa serán los si- 
guientes: 


Este último paso originará un fichero lla- 
mado nombre de mi programa.exe y si a 
continuación tecleamos nombre de ml 


programa.exe conseguiremos ejecutar 
nuestro programa. 

La estructura en general de un programa 
C sería: 


< GRUPO DE 
SENTENCIAS 


GRUPO DE 


=_——__—. 
SENTENCIAS 


GRUPO DE 


. SENTENCIAS 


Elementos del lenguaje C 


El lenguaje C soporta los siguientes ti- 
pos de datos: 


— Caracteres. 
— Enteros. 

— Números en coma flotante. 
— Funciones. 

— Arrays y punteros. 

— Estructuras. 

— Uniones. 


e 


— Aritméticos. 

— Relacionales. 
— Lógicos. 

— Manejo de bits. 
— Asignación. 

— Condicional. 

— Acceso a datos. 


Estructuras de control tales como: 


— Sentencias. 

— Sentencia «If-Then-Else». 
— Sentencia «switch». 

— Saltos y etiquetas. 


Tipos de constantes tales como: 

— Enteros: dígitos numéricos. 

— Números en coma flotante (carac- D Epors ima pida astibdos 
teres y constantes alfanuméricas). 


Funciones de entrada/salida, que for- 
man parte de la librería estándar del C, 
y entre otras citaremos: 
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INTRODUCCION 


UANDO nos enfrenta- 
mos con un problema 
que debemos resol- 
ver mediante un or- 
denador de modo in- 
mediato, pensamos 
en un algoritmo que, 
: == traducido en un pro- 
grama, nos lleve a la solución. Pero esta 
forma de enfocar la resolución de pro- 
blemas mediante ordenador presenta 
dos inconvenientes graves para un usua- 
rio de tipo medio: 


— Por cada problema distinto a resol- 
ver deberíamos tener un programa que 
nos lo solucionara, con la consiguiente 
acumulación de programas de funciona- 
miento y manejo dispar. 

— Muchas veces la inexistencia de 
programas específicos para una serle de 
problemas determinados lleva consigo 
que el usuario deba crear por sí mismo o 
encargar a una empresa especializada 
un programa para resolverlo. 


Normalmente el usuario no es un exper- 
to en Informática, sino que, simplemente, 
debe utilizar un ordenador en su activi- 
dad diaria para resolver una serie de pro- 
blemas. 

Por ello, lo que en estos casos debe 
preocupar y ocupar su tiempo es en re- 
solver el problema, no en cómo decirle 
al ordenador cómo resolverlo. 

Para ello, desde hace algún tiempo es- 
tán apareciendo en el mercado una se- 
rie de programas de uso general, que lla- 
maremos aplicaciones, que permiten 


APLICACIONES 


concentrarse en la resolución del proble- 
ma sin necesidad de programar el orde- 
nador, ni de conocimientos específicos 
sobre Informática. 

Estas aplicaciones están diseñadas de 
tal forma que con ellas es posible abar- 
car todo el espectro de necesidades 
más usuales en la actividad diaria con un 
ordenador, eludiendo la mayoría de las 
veces el uso de programas específicos. 
De hecho un usuario no tiene por qué utl- 
lizar más que tres o cuatro programas de 
uso general. 


A 


¡ES Las aplicaciones permiten resolver más de un 
problema. 


Tipos de aplicaciones 


Dentro del conjunto de aplicaciones 
disponibles en el mercado podemos ha- 
cer la siguiente división: 


a Procesadores de texto 


Estos programas nos permiten crear y 
editar textos, como cartas, memorán- 
dums, etc. 

De hecho, transforman un ordenador 
en una máquina de escribir muy sofistica- 
da, con unas posibilidades impensables 
en cualquier otro tipo de máquina de es- 
cribir. Los procesadores de texto nos per- 
miten componer, poner márgenes, corre- 
gir de forma interactiva el texto y un 
montón más de posibilidades de edi- 
ción. 

Con un procesador de textos pueden 
crearse una serie de cartas personaliza- 
das con la ayuda de una base de datos, 
para así realizar una circular a unos clien- 
tes, por ejemplo. 

De entre los procesadores de texto, sin 
duda el más conocido es el WORDSTAR, 
del que hay innumerables versiones para 
casi todos los ordenadores. 
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Otros procesadores de texto muy co- 
nocidos son: 


— LOCOSCRIPT. 

— MICROSOFT WORD. 
WRITING ASSISTANT. 
PERSONAL EDITOR. 
— EASY WRITER. 

— WORD PERFECT. 


a Hojas de cálculo 


Las llamadas “hojas de cálculo” son 
unas aplicaciones que permiten realizar 
de forma sencilla cualquier tipo de cálcu- 
lo en el cual intervengan tablas de nú- 
meros y relaciones numéricas entre ellos. 
Su propiedad fundamental es la de la 
“actualización automática”, que consis- 
te en que si cambiamos el valor de un nú- 
mero todos los valores y fórmulas relacio- 
nados con él se actualizarán, de forma 
automática, permitiendo con ello cana- 
lizar situaciones y proyectos, modelos de 
acumulación de situaciones reales, 

Su uso más frecuente consiste en cálcu- 
los financieros y estimación de ten- 
dencias, pero con las hojas de cálculo 
actuales podemos resolver casi cual- 
quier problema de cálculo, llegando a 
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PROGRAMA DE APLICACIONES 


Introducción a los programas de aplicación. 


Tipos y usos de los principales programas. 
Tratamiento de textos: WordStar. 

— Hojas de cálculo; Multiplán, Lotus 1-2-3. 
— Bases de datos: dBase ll, dBase ll!. 


— Paquetes Integrados: Open Access, Symphony, Framework, 


ICENTRA 2PON MI 


[A Ejemplo de procesador de textos: WordsSiar. 
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convertirse en verdaderos “lenguajes” 
de programación. 
La Idea básica de una hoja de cálculo 
es la siguiente: 
4 2 3 4 


A 


ía 

Tenemos una matriz bidimensional en 
la cual cada intersección de fila y colum- 
na es lo que se llama una “celda”, en la 
cual puede almacenarse un valor numé- 
rico o una fórmula que esté relacionada 
con otras celdas. De este modo pode- 
mos llegar a establecer una serie de re- 
laciones entre las celdas que nos permi- 
ten realizar los cálculos que precisemos. 

En el mercado hay muchas hojas de 
cálculo, de entre las cuales las más ex- 
tendidas son: 


Concepto de hoja de cálculo. 


ENERO FEBRERO 


ITEM41 
¡TEM42 
ITEM43 
ITEM44 
ITEMF5 
ITEM+6 
ITEM+47 
ITEM+8 
ITEM39 
ITEM3*10 
ITEM411 
ITEM+12 


1 
2 
3 
4 
5 
6 
7 
8 
9 


50891 84386 


— VISICALC. 

— MULTIPLAN. 

— LOTUS 1-2-3, 

— SUPERCALC. 

,— TK SOLVER! (para aplicaciones cien- 
tificas). 


UM) Buses de Datos 


Una de las utilizaciones más comunes 
de un ordenador es la de almacena- 
miento y recuperación de grandes can- 
tidades de datos, ordenados y estructu- 
rados de alguna manera determinada. 

Para este tipo de aplicaciones existen 
en el mercado las llamadas “bases de 
datos”, que son programas para gestio- 
nar graves soluciones de Información de 
tal forma que podamos almacenarlos y 
recuperarlos de una forma coherente, 
práctica y eficaz. 

Normalmente, los datos están almace- 
nados en algún tipo de dispositivo físico, 
siendo el más común el disco flexible, 
aunque es recomendable el uso de dis- 
cos duros de tecnología Winchester por 
su mayor velocidad de acceso. 

Las bases de datos nos permiten guar- 
dar y recuperar los datos de una forma 
determinada por medio de sistemas es- 
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Seleccionar opción o pulsar inicial de mandato 
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lA! Ejemplo de hoja de cálculo. Multiplián. 


LA Ejemplo de base de datos = aBase lll. 


peciales de ordenación de ficheros, y re- 
cuperar toda o una parte de la intorma- 
ción de una forma muy sencilla. 

Sin duda, la base de datos más cono- 
cida es la dBASE lll, estando su uso muy 
extendido para aplicaciones de tamaño 
medio. Para aplicaciones con poco vo- 
lumen de datos existen otros programas 
como el PFS:FILE o el FILLING ASSISTANT, 
que permiten manejar los datos de una 
forma muy sencilla. 


a Paquetes integrados 


Cuando necesitamos realizar distintas 
operaciones sobre un mismo conjunto de 
datos, como cálculos, actualizaciones 
de una base de datos, necesitamos po- 


IÉN Ejemplo de paquete integrado. Framework, 
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der intercambiar los datos entre una apli- 
cación y otra con el problema de que 
muchas veces el formato de los datos de 
las aplicaciones que manejamos no son 
compatibles entre sí. Por ello se han dise- 
ñado los llamados paquetes integrados, 
que no son más que una reunión de to- 
dos los programas que hemos visto en 
una sola aplicación. Esto es, un paquete 
que reúne en una sola aplicación un pro- 
cesador de texto, una hoja de cálculo, 
una base de datos, etc. 

Estos paquetes integrados permiten re- 
solver cualquier tipo de problema sin ne- 
cesidad de recurrir a otros programas. 

De entre los paquetes integrados más 
conocidos podemos cltar: 

— SYMPHONY. 

— OPEN ACCESS. 

— FRAMEWORK. 
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